UniMedia IDE集成環(huán)境訪問數據庫實例解析
2009/05/19
1.目標功能
假設有數據庫TestDB，表Table1，從表中取出IDNO＝1的記錄
2.IDE腳本實例
//假定SQLServer數據庫、數據庫名為TestDB， 表名為Table1，表中有字段IDNO
///////////////////////////////////////////////////////////////////
sub main(LIST& cpl) //進程主函數
{
DB l_DBVar
string l_stringConnStrVar, l_stringQuerySqlVar
string l_stringResultValueVar, l_stringRecordValueVar
LIST l_LISTResultVar
Int l_intRetVar, l_intDBIDVar, l_intCountVar, l_intIndexVar
//** 訪問數據庫連接串
// 用戶名User, 密碼123456, 用工具(dbconnstr.exe)自動生成
l_stringConnStrVar = "Provider=SQLOLEDB;Initial Catalog=TestDB;
Password=123456;Persist Security Info = False;User ID=User"
//** 打開數據庫
l_DBVar.OpenDB(l_stringConnStrVar, l_intDBIDVar,false, l_intRetVar)
//** 在數據庫表中查詢記錄IDNO=1的記錄
//SQL語句
l_stringQuerySqlVar = "select * From Table1 where IDNO=1"
//** 執(zhí)行數據庫查詢
l_DBVar.Query(l_stringQuerySqlVar,l_LISTResultVar,l_intRetVar)
if (l_intRetVar == RET_SUCC)
{
//查詢成功，取第一天查詢記錄的結果值
l_intCountVar = 0
l_stringRecordValueVar = ""
//取查詢記錄的字段數
l_LISTResultVar.GetCount(l_intCountVar,l_intRetVar)
//依次取結果記錄字段，用';'分隔，合成結果字符串
for(int i = 0; i < l_intCountVar; i= i+1)
{
l_stringResultValueVar = ""
l_LISTResultVar.GetItem(i,l_stringResultValueVar,l_intRetVar)
StrTrim(l_stringResultValueVar)
StrCatEx(l_stringRecordValueVar,l_stringRecordValueVar,
l_stringResultValueVar,";")
}
Log(DBG,"FirstRecord=",l_stringRecordValueVar,")")
//TODO：如果滿足條件的記錄有多條記錄
//查詢下一條記錄
l_DBVar.QueryNext(l_LISTResultVar,l_intRetVar)
//...
}
//**關閉數據對象，斷開數據庫訪問
l_DBVar.CloseDB()
}
CTI論壇報道
相關鏈接:
永德县|
安泽县|
沐川县|
天津市|
锡林浩特市|
新郑市|
岢岚县|
南阳市|
新乐市|
申扎县|
龙陵县|
维西|
永州市|
武邑县|
宿迁市|
吉木萨尔县|
马尔康县|
小金县|
眉山市|
自贡市|
贵阳市|
仙居县|
温州市|
漾濞|
沙田区|
连平县|
温州市|
武宣县|
临漳县|
江油市|
建始县|
抚远县|
宿松县|
绥滨县|
松桃|
大悟县|
长岛县|
虹口区|
新巴尔虎右旗|
罗田县|
天津市|