台灣最大程式設計社群網站
線上人數
569
 
會員總數:245800
討論主題:189429
歡迎您免費加入會員
討論區列表 >> VB6 >> ODBC語法問題
[]  
[我要回覆]
1
回應主題 加入我的關注話題 檢舉此篇討論 將提問者加入個人黑名單
ODBC語法問題
價值 : 50 QP  點閱數:297 回應數:1
樓主

蕭裴
門外漢
0 6
90 4
發送站內信

語法如下:
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
ConnectionString = "DRIVER=mariaDB ODBC 3.1 DRIVER;SERVER=X.X.X.X;DATABASE=WWW;USER=user;password=pas;port=3306;"
conn.Open ConnectionString
If conn.State = 1 Then
MsgBox "連線成功!"
Adodc1.Recordset.AddNew
Else
MsgBox "無法連線!"
End If
conn.Close

學長請教一下 我利用ODBC連接遠端資料庫
目前想要新增一個功能 就是
要新增一筆資料時 先判斷遠端資料庫是否連線正常
如連線正常就寫入資料
如果連線失敗就等待 然後再嘗試連線
----------------------------------
目前遇到的狀況是 資料庫開啟 可以顯示連線成功
但是我把資料庫 故意關閉
程式沒有執行到"無法連線"
偵錯在conn.Open ConnectionString 此句
顯示錯誤視窗為


要如何排除或不要讓這視窗出現 讓程式可跑至 MsgBox"無法連線" 這段

搜尋相關Tags的文章: [ odbc ] , [ 資料庫 ] ,
本篇文章發表於2019-09-29 18:30
1樓
最有價值解答

MIS2000 Lab
檢舉此回應
您要連上去以後,才能顯示連線的狀態(.State屬性)
所以會卡在conn.Open ConnectionString這一列程式碼,是正常的吧?

如果真的斷線了,你程式在那邊等待,要等多久重試一遍?
User願意等多久?

我覺得您可以試試看 - ConnectionTimeout 屬性 (ADO)
https://docs.microsoft.com/zh-tw/sql/ado/reference/ado-api/connectiontimeout-property-ado?view=sql-server-2017
本篇文章回覆於2019-09-30 18:02
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔--
   
1

回覆
如要回應,請先登入.