[已解决]求助：一段SQL代码放在VBA中出错

suxiong

Sub AC()
Dim cnn As New Connection
Dim rs As New Recordset
Dim sql As String
Dim qx As String
qx = "金牛"
strcn = "rovider=sqloledb;Database=test;Uid=sawd=30687724;data source=127.0.0.1,1433;"
sql ="EXEC master..xp_cmdshell 'bcp test.dbo.成绩in d:\test\123.xls -c -q -S"127.0.0.1" -U"sa" -P"30687724"'"
cnn.Open strcn
rs.Open sql, cnn
    rs.Close
    cnn.Close

End Sub

红色这段不行，不运行都一直提示“缺少结束语句”。见附件！

新建 Microsoft Office Excel 工作表.rar (10.94 KB, 下载次数: 12)

2011-12-28 15:33 上传

点击文件名下载附件

最佳答案

月排行榜 / 总排行榜

Zipall

2011-12-28 15:50

双引号中的双引号,2个代表1个.

例如 "a""b" 最终得到字符串 a"b

跳转到最佳答案楼层

Zipall

双引号中的双引号,2个代表1个.

例如 "a""b" 最终得到字符串 a"b

suxiong

Zipall 发表于 2011-12-28 15:50
双引号中的双引号,2个代表1个.

例如 "a""b" 最终得到字符串 a"b

双括号？“（）”还是‘’，我这里没有啊，麻烦你帮我写一下这一句吧：

1. 
   
2. sql ="EXEC master..xp_cmdshell 'bcp test.dbo.成绩in d:\test\123.xls -c -q -S"127.0.0.1" -U"sa" -P"30687724"'"
   

复制代码

Zipall

suxiong 发表于 2011-12-28 17:26
双括号？“（）”还是‘’，我这里没有啊，麻烦你帮我写一下这一句吧：

"""""""""""""""""""""""
是双引号,不是括号.

suxiong

Zipall 发表于 2011-12-28 17:37
"""""""""""""""""""""""
是双引号,不是括号.

谢谢，麻烦帮在我回答下这个吧。！！


http://www.excelpx.com/thread-216604-1-1.html