Question

我正在测试一个小程序，将一些数据写入SQL Server 2008数据库。这是代码：

Dim MyConn As ADODB.Connection
Dim MyRecSet As ADODB.Recordset
Dim st1 As Integer

Set MyConn = New ADODB.Connection
MyConn.ConnectionString = "Provider=sqloledb;" & _
       "Data Source=xxx\SQLEXPRESS2;" & _
       "Initial Catalog=db;" & _
       "User Id=sa;" & _
       "Password=xxx"
MyConn.Open

st1 = 5
 MyConn.Execute("INSERT INTO steen (steen1) VALUES (st1)")

MyConn.Close

但是，我收到错误：列名'st1'无效。我不知道为什么我会得到这个错误。当我将查询更改为：

INSERT INTO steen (steen1) VALUES (5)

效果很好。

有没有人知道我为什么会收到错误？

由于

Answer 1

尝试：

MyConn.Execute("INSERT INTO steen (steen1) VALUES ("& st1 & ")")

或者：

st1 = 5
 Dim StrQuery As String
StrQuery = "INSERT INTO steen (steen1) VALUES ("& st1 & ")"


MyConn.Execute(StrQuery)

VB6 - 带有插入查询的列名无效

1 个答案: