数据库连接

[gaoninggao]

小弟有一事向求，小弟是一名在校的学生，现在正在用于vb为一公司做一个c/s系统，在此小弟想问您，数据库连接 的时候你们这些高手是怎么做的，小弟想了解一下， 你们都是有经验的高手，所以小弟希望大哥您能给 一些经验方面的知道，最好能有些具体的vb代码． 谢谢！我的邮箱是:[e-mail],小弟的分不多，不好意思，希望你们能帮小弟一把．

[cangwu_lee]

ADODB + DBGrid + ……

google/baidu 查找范例

[hzybc]

http://www.connectionstrings.com/


大全

[sdomzl12]

Congratulations

[clear_zero]

我喜欢adodb连接数据库

其他的要看你的需求

[a_yin]

我也比较喜欢用adodb连接数据库
在校就做项目，很好啊！努力肯定会有收获！下面是我连接数据库的常用方法，希望对你有所帮助！
Dim Con As ADODB.Connection
Dim rs As ADODB.Recordset
Dim strCon As String, strSQL As String
Set Con = New ADODB.Connection
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\sf.mdb"
Con.Open strCon
Set rs = New ADODB.Recordset
strSQL = "select sum(YGRC) as total from [sf] where format(RQ,'yyyy-mm')='" & Left$(Date$, 7) & "'"
Set rs.ActiveConnection = Con
rs.Open (strSQL)
Text10.Text = rs("total")
rs.Close
Set rs = Nothing

[ct114047689]

rs,open XX(Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=),data_ling(dim data_ling as string),3,2
text1.text=rs.fields("XXXX")