erp實施(編輯修改稿)
2025-03-17 15:40 本頁面
【文章內(nèi)容簡介】 個為什么連接數(shù)據(jù)庫 PBTransaction SQLCA // 事務(wù)對象 = ProfileString (gs_inifile, DATABASE, dbms, MSS) = ProfileString (gs_inifile, DATABASE, DATABASE, KF) = ProfileString (gs_inifile, DATABASE, userid, dbo) = ProfileString (gs_inifile, DATABASE, dbpass, ) = ProfileString (gs_inifile, DATABASE, logid, sa) = ProfileString (gs_inifile, DATABASE, LogPassWord, ) = ProfileString (gs_inifile, DATABASE, ServerName, (local)) = ProfileString (gs_inifile, DATABASE, Dbparm, ) = FALSEconnect Using SQLCA。 // 打開連接Disconnect Using SQLCA 。 // 切斷連接// Profile sss = ODBC = False = ConnectString=39。DSN=Excel Files。UID=。PWD=39。連接 Access// Profile Access = ODBC = False = ConnectString=39。DSN=MS Access Database。UID=。PWD=39?！?/ VB1 Driver={SQL Server}。Server=Server1。Uid=SA。Pwd=。Database=northwind // VB –2 = sqloledb“ ProvStr = Server=MyServer。Database= northwind。 Trusted_Connection=yes provStr 2/27/2023 18數(shù)據(jù)庫入門十萬個為什么獲取數(shù)據(jù) SQL語句String ls_empl_name // 變量定義Select empl_name INTO :ls_empl_name FROM bse_employee Where empl_no = ‘system’ Using SQLCA 。 if 0 then // … 失敗 Else // …. 成功 End ifLong ld_id = 0 String as_table = “tableXXX”//updateUPDATE sys_system_id SET id_counter = :ld_id WHERE id_table_name = :as_table Using SQLCA。2/27/2023 19數(shù)據(jù)庫入門十萬個為什么獲取數(shù)據(jù) Datawindow// Dw_list Datawindow// d_employee_edit Datawindow Object (SQLCA)( , )….//保存數(shù)據(jù)ll_ret = (TRUE ,TRUE) // 判斷 If ll_ret
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1