From子句中的语法错误 - VB6

获取上述错误消息时出现问题。任何人都可以协助吗？From子句中的语法错误 - VB6

Dim cn As New ADODB.Connection 
Dim cmd As New ADODB.Command 
Dim RS As New ADODB.Recordset 
Dim RS2 As New ADODB.Recordset 

Set cn = New ADODB.Connection 
Call cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & TheServer & 
      FileTypeOld & ";" & "Jet OLEDB:Database Password=12345678;") 

If cn.State = 0 Then cn.Open 
Set cmd.ActiveConnection = cn 
cmd.CommandText = "SELECT * FROM mov" 
cmd.CommandType = adCmdTable 
Set RS = cmd.Execute

来源

2012-11-20 user1838163

问题是你使用的是SQL sta用指令键入adCmdTable。使用该命令类型时，ADO将在内部生成选择查询，在这种情况下，您只需指定表的名称即可。

或者，只是删除cmd.CommandType = adCmdTable线一起，保持select * syntax。

来源

2012-11-20 12:52:55 tcarvin

太好了 - 非常感谢。我删除了Cmd.CommandType这一行。非常感谢你。 – user1838163

您需要吨增加这个人物_这是在该行的末尾强调

与此只需更换：

Call cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & TheServer & _ 
FileTypeOld & ";" & "Jet OLEDB:Database Password=12345678;")

，或者您可以两行合并成无下划线一行，就像这样

Call cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & TheServer & ileTypeOld & ";" & "Jet OLEDB:Database Password=12345678;")

来源

2012-11-20 10:46:46 hassan

谢谢。我在代码中有下划线。这里没有显示。 – user1838163

From子句中的语法错误 - VB6

回答

相关问题