Question

请教vb数据库问题用Adodc控件 insert into 插入数据为何出错

Adodc1.ConnectionString = "Provider=SQLNCLI10.1;Integrated Security="";Persist Security Info=False;User ID=sa;Initial Catalog=ProjectDT;Data Source=(local);Initial File Name="";Server SPN="""
Adodc1.UserName = "sa"
Adodc1.Password = "loqq234"
Adodc1.RecordSource = "insert into EMS_Test(stemp) values('1111')"
Adodc1.Refresh
这段话执行出现“应用程序定义或对象定义错误”但实际上数据已经插入成功了，哪里有错？
insert into EMS_Test(stemp) values('1111')直接在数据库查询中运行没问题

Answer 1

Adodc1 数据控件是以 ADO 的方式访问数据库的控件，一般要获取数据记录集时用 Adodc 控件
也数据说 Adodc,RecordSource 中一般赋值 Select 语句。
如果你要执行更新，删除等SQL语句，建议使用 ADO 数据连接去执行。
如：
'连接SQL 数据库
Dim adoConn as New ADODB.Connection
Dim adoStr as String

adoStr="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa; Password=XXXXXX; Data Source =服务器（电脑名称）;Initial Catalog=SQL数据库名;"
'建立连接
adoConn.Open adoStr
'插入数据
adoConn.Execute "INSERT INTO EMS_Test(stemp) Values('1111') "
'删除数据
adoConn.Execute "Delete From EMS_Test"

不能确定你的数据连接字符串有没问题。

Answer 2

Adodc1.ConnectionString = "Provider=SQLNCLI10.1;Integrated Security="";Persist Security Info=False;User ID=sa;Initial Catalog=ProjectDT;Data Source=(local);Initial File Name="";Server SPN="""
Adodc1.UserName = "sa"
Adodc1.Password = "loqq234"
Adodc1.Refresh
Adodc1.RecordSource = "insert into EMS_Test(stemp) values('1111')"
Adodc1.Refresh

追问

这样一样出错