UniMedia IDE集成環(huán)境訪問數(shù)據(jù)庫實例解析
                  
                   2009/05/19
                  1.目標功能
                    假設(shè)有數(shù)據(jù)庫TestDB,表Table1,從表中取出IDNO=1的記錄
                  
                  2.IDE腳本實例
                  //假定SQLServer數(shù)據(jù)庫、數(shù)據(jù)庫名為TestDB, 表名為Table1,表中有字段IDNO
                  ///////////////////////////////////////////////////////////////////
                  sub main(LIST& cpl) //進程主函數(shù)
                  {
                  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
                  
                  //** 訪問數(shù)據(jù)庫連接串
                  // 用戶名User, 密碼123456, 用工具(dbconnstr.exe)自動生成
                  l_stringConnStrVar = "Provider=SQLOLEDB;Initial Catalog=TestDB;
                  Password=123456;Persist Security Info = False;User ID=User"
                  
                  //** 打開數(shù)據(jù)庫
                  l_DBVar.OpenDB(l_stringConnStrVar, l_intDBIDVar,false, l_intRetVar)
                  
                  //** 在數(shù)據(jù)庫表中查詢記錄IDNO=1的記錄
                  //SQL語句
                  l_stringQuerySqlVar = "select * From Table1 where IDNO=1"
                  //** 執(zhí)行數(shù)據(jù)庫查詢
                  l_DBVar.Query(l_stringQuerySqlVar,l_LISTResultVar,l_intRetVar)
                  
                  if (l_intRetVar == RET_SUCC)
                  {
                  //查詢成功,取第一天查詢記錄的結(jié)果值
                  l_intCountVar = 0
                  l_stringRecordValueVar = ""
                  
                  //取查詢記錄的字段數(shù)
                  l_LISTResultVar.GetCount(l_intCountVar,l_intRetVar)
                  //依次取結(jié)果記錄字段,用';'分隔,合成結(jié)果字符串
                  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)
                  //...
                  }
                  
                  //**關(guān)閉數(shù)據(jù)對象,斷開數(shù)據(jù)庫訪問
                  l_DBVar.CloseDB()
                  } 
                  CTI論壇報道
                  
 相關(guān)鏈接:
河南省|
全州县|
五家渠市|
仁寿县|
康定县|
称多县|
马鞍山市|
双桥区|
故城县|
朝阳县|
新安县|
安远县|
墨竹工卡县|
错那县|
孟津县|
高州市|
洪洞县|
托克逊县|
黄石市|
南漳县|
平昌县|
平南县|
惠东县|
固阳县|
呼伦贝尔市|
长沙县|
张家界市|
上高县|
五莲县|
中牟县|
新泰市|
伊川县|
嘉鱼县|
南部县|
永宁县|
广饶县|
仁布县|
醴陵市|
武清区|
新宾|
潞西市|