vb连接数据库的

王朝知道·作者佚名  2009-06-01
窄屏简体版  字體: |||超大  
 
分類: 電腦/網絡 >> 程序設計 >> 其他編程語言
 
問題描述:

我想把数据库yuanliaochang的表user中的用户名username添加到cmbName中,cmbName的caption属性为用户名,我的数据库用的是sql server 2000,操作系统windows server 2003,计算机名为server。请问我以下的代码哪里不对啊?

Option Explicit

Dim sql As String

Dim conn As New ADODB.connection

Dim yuanliaochang As String

Dim user As String

Dim rs As New ADODB.Recordset

Private Sub Form_Load()

Dim connectionstring As String

connectionstring = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=yuanliaochang;Data Source=SERVER"

conn.Open connectionstring

If conn.State <> 1 Then

conn.Open (connectionstring)

End If

Set rs = conn.Execute("select * from user")

With rs

.MoveFirst

Do While Not .EOF

DoEvents

cmbName.AddItem (!用户)

.MoveNext

Loop

End With

cmbName.ListIndex = 0

conn.Close

End Sub

提示是在关键字user附近有语法错误,Set rs = conn.Execute("select * from user")一行就变成黄的了,应该怎么改啊?

參考答案:

Set rs = conn.Execute("select * from [user]")

user是关键字,使用时需要用方括号括上

小贴士:① 若网友所发内容与教科书相悖,请以教科书为准;② 若网友所发内容与科学常识、官方权威机构相悖,请以后者为准;③ 若网友所发内容不正确或者违背公序良俗,右下举报/纠错。
 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航