sqldirect调用sql server存储过程demo

来源:互联网 发布:vgg 网络结构 编辑:程序博客网 时间:2024/05/16 09:26
SDDatabase1->DatabaseName = "DB5";
SDDatabase1->ServerType = stOLEDB;
SDDatabase1->LoginPrompt = false;
SDDatabase1->RemoteDatabase = "Provider=SQLNCLI11;Persist Security Info=True;Data Source=192.168.0.230;Initial Catalog=DB5;User ID=db_user_id;Password=db_password";


SDStoredProc1->DatabaseName = SDDatabase1->DatabaseName;
SDStoredProc1->StoredProcName = "sp_spaceused";


SDDatabase1->Connected = true;
SDStoredProc1->Open();


while (!SDStoredProc1->Eof)
{
String database_name = SDStoredProc1->Fields->Fields[0]->AsString;
String database_size = SDStoredProc1->Fields->Fields[1]->AsString;
String unallocated_space = SDStoredProc1->Fields->Fields[2]->AsString;
SDStoredProc1->Next();


ShowMessage(database_name);
ShowMessage(database_size);
ShowMessage(unallocated_space);
}


SDStoredProc1->NextResultSet();


while (!SDStoredProc1->Eof)
{
String reserved = SDStoredProc1->Fields->Fields[0]->AsString;
String data = SDStoredProc1->Fields->Fields[1]->AsString;
String index_size = SDStoredProc1->Fields->Fields[2]->AsString;
String unused = SDStoredProc1->Fields->Fields[3]->AsString;
SDStoredProc1->Next();


ShowMessage(reserved);
ShowMessage(data);
ShowMessage(index_size);
ShowMessage(unused);
}


SDStoredProc1->Close();
SDDatabase1->Connected = false;
0 0
原创粉丝点击