VBA中连SQL SERVER连接串正确,执行打开也不报错,但是返回的状

fieldset{padding:10px;}

VBA中连SQL SERVER连接串正确,执行打开也不报错,但是返回的状态却是0(关闭)Dim CNN2 As New ADODB.ConnectionDim CNN_cmd As New ADODB.CommandDim pthStr_tempdb As String ‘因存储过程在 tempdb 所以要与之联系If CNN2.State = adStateClosed Then pthStr_tempdb = "Provider=SQLOLEDB.1;server=ICA0006\SQLEXPRES;user id =sa;password=qlzhang123;database=tempdb" CNN2.Open pthStr_tempdb ‘ 这句没有报错,是否代表我已经打开了呢? MsgBox (CNN2.State) ‘对话框却显示cnn的连接状态为0,也就是关闭状态 End If ‘程序一直继续执行,无错误 Set CNN_cmd.ActiveConnection = CNN2 ‘指示指定的 Command对象当前所属的 Connection对象。 CNN_cmd.CommandText = "Pro_GG_CD1" ‘设置Command对象源。"Pro_GG_CD1" CNN_cmd.CommandType = adCmdStoredProc ‘adCmdStoredProc 存储过程 Set Rst_back = CNN_cmd.Execute 执行到这里也没有报错,然后正常终了 但是没有取得数据库中值。实际上我在SQL SERVER 2005 EXPRESS 单独执行存储过程时,是有数据的。——解决方案——————————————————–数据库编程没怎么做过。。。偶很菜,但是感觉起码要给点分吧,要不都没哟回答问题的动力——解决方案——————————————————–把错误处理屏蔽掉,单步调试看看。——解决方案——————————————————–把错误处理屏蔽掉,单步调试看看。并检查连接字符串——解决方案——————————————————–CNN2.Open pthStr_tempdb[,][,]后面还有参数的,你应该选择这些参数的.——解决方案——————————————————–Dim cn As New ADODB.ConnectionDim rs As new ADODB.Recordset ‘我比较熟悉recordset,个人感觉recordset比command好用dim strsql as stringCNN2.ConnectionString = "Provider=SQLOLEDB.1;server=ICA0006\SQLEXPRES;user id =sa;password=qlzhang123;database=tempdb" CNN2.Openstrsql=sql语句rs.CursorLocation = adUseClient ’假如要绑定datagrid就要设游标了,不设游标recordset声明时不需要new关键字rs.Open strsql, cn, adOpenDynamic, adLockOptimisticSet rs.ActiveConnection=nothing ‘关闭数据库连接cn.closeset datagrid1.datasource=rs ’rs关闭连接后,rs相当于内存中的一个数组。用起来很方便通电话,旅行,重复一个承诺和梦想,

VBA中连SQL SERVER连接串正确,执行打开也不报错,但是返回的状

相关文章:

你感兴趣的文章:

标签云: