Ⅰ 怎麼用VB6通過ADO連接sql Server 2008
Set cn = New ADODB.Connection
str="Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=databasename;Data Source=192.168.0.1"
cn.Open str
......
cn.close
set cn=nothing
Ⅱ vb6連接sql server 2008
用adodb啊。網上查一下,多的是。但是vb6裡面要引用adodb
連接字元串這樣寫
"Provider=SQLNCLI.1;Persist Security Info=False;Data Source=" & 「伺服器ip」 & _
";Initial Catalog=" & 「資料庫名「 & ";User ID=" & 」用戶名「 & _
";Password=" & 」用戶密碼「
Ⅲ vb6 動態查詢 sqlserver 2008 R2資料庫中的數據
看你的欄位時間,是前面最小後面最大,假設你時間最大的是出庫完成(如果不是,你自己修改下)時間范圍限定應該限定最小時間欄位和最大時間欄位都在范圍內,時間差用datediff函數,不過這玩意取整數,如果用小時為單位的話,一小時50分鍾也算一小時,所以取分鍾為單位
如下(假定最小日期是訂單錄入,最大日期是出庫完成,不是的話自己修改欄位名)
SQL = "SELECT * from 表名 where datediff( minute," & Combo1(1).Text & " , " & Combo1(2).Text & " )> " & Text1.Text & "*60 AND 訂單錄入 >= '" & _
Format(DTPicker1(0).Value, "yyyy-MM-dd") & " 0:0:1' AND 出庫完成 <= '" & Format(DTPicker1(1).Value, "yyyy-MM-dd") & " 23:59:59'"
如果不知道哪個欄位是最大日期哪個欄位是最小日期,那就只能每個欄位都加限定條件了
這是兩個欄位判斷,繼續and下去,所有欄位判斷一遍,都不超出范圍才算
Dim SQL As String
SQL = "SELECT * from 表名 where datediff( minute," & Combo1(1).Text & " , " & Combo1(2).Text & " )> " & Text1.Text & "*60 AND (訂單錄入 between '" & _
Format(DTPicker1(0).Value, "yyyy-MM-dd") & "' AND '" & Format(DTPicker1(1).Value, "yyyy-MM-dd") & "') AND (訂單審核 between '" & _
Format(DTPicker1(0).Value, "yyyy-MM-dd") & "' AND '" & Format(DTPicker1(1).Value, "yyyy-MM-dd") & "')"
Ⅳ 如何用VB6通過ADO連接SQL Server 2008
Set cn = New ADODB.Connection str="Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=databasename;Data Source=192.168.0.1" cn.Open str ...... cn.close set cn=nothing
Ⅳ 如何用VB6通過ADO連接SQL Server 2008
用ADO遠程連接SQL的編寫方式和區域網內部的是一樣的,如果你在內網能夠訪問SQL的話,那麼在公網上你需要在遠端路由器上開啟IP地址及埠映射,比如,SQL伺服器的內網IP 是192.168.2.25 而外網地址是125.50.58.61 的話,你就必須在路由器上 添加125.50.58.61:443 到 192.168.2.25:443的映射記錄。最好在SQL伺服器上的防火牆里也添加上443埠例外。然後在程序里指定ADO的連接地址為125.50.58.61(SQL伺服器的外網地址) 最後補充一下,通過公網直接訪問SQL是不推薦的做法,主要是因為安全問題以及效率問題。一般的做法是在伺服器端開發相應的數據服務程序,用於和客戶端通信。建議你看看B/S和C/S兩種架構。
Ⅵ vb6.0 訪問sql2008 和sql2000
先把SQL2008服務停止,再啟動SQL2000服務應該就可以了,因為默認埠都是1433
Ⅶ VB6+SQl2008 EOF出錯問題,已經判斷是否eof還是出錯
如果數據表內沒有記錄,
或查詢沒有符合條件的記錄,
也就是記錄集為空時,eof和bof會同時為真。
Ⅷ vb6.0查詢sql2008數據
你可以先查詢輸入時間的ID,然後再返回ID+1的時間就可以 了啊。