mistletoe 发表于 2003-5-17 20:19:00

[求助]

mistletoe 发表于 2003-5-17 20:23:00

和sql连接问题

怎么和sql数据库连接
怎么操作数据库，如写数据到表里去

mistletoe 发表于 2003-5-21 09:38:00

斑竹发发彪，回复一下啊

efan2000 发表于 2003-5-21 12:42:00

使用ADO连接。

Dim cnn1 As ADODB.Connection
Set cnn1 = New ADODB.Connection
Dim strCnn As String
'Provider是提供者，sqloledb表明是指向SQL数据库，Data Source是数据源，srv是SQL中的数据库。
strCnn = "Provider=sqloledb;" & _
    "Data Source=srv;Initial Catalog=Pubs;User Id=sa;Password=; "
cnn1.Open strCnn
Dim rstAuthors As ADODB.Recordset
Set rstAuthors = New ADODB.Recordset
'Authors是SQL数据库中的一个表。
rstAuthors.Open "Authors", strCnn, , , adCmdTable
Debug.Print rstAuthors.RecordCount
rstAuthors.Close
cnn1.Close
页: [1]
查看完整版本: [求助]