Question

Dim testvar

testvar =＆＃34;＆＃34; sqlcmd.exe -S SERVERNAME \ INSTANCENAME -U USERNAME -P PASSWORD -r1 -W -Q＆＃34; select * from Event.dbo.ALL_EVENTS where（POLICY_TYPE！= ＆＃39; LOGFILE＆＃39;和状态=＆＃39; OPEN＆＃39;和类别等＆＃39; Windows的高＆＃39;并且不（POLICY_NAME像＆＃39;第2级和3警报％＆＃39 ;），而不是（TITLE像＆＃39;％2级：％＆＃39），而不是（TITLE像＆＃39;％3级：％＆＃39）和（严重性=＆＃39; MAJOR＆＃ 39;或严重性=＆＃39; MINOR＆＃39;或严重性=＆＃39; CRITICAL＆＃39;））＆＃34;＆＃34; wscript.echo命令

Answer 1

Hey Sahil您是否尝试使用函数

返回结果

参考：How to save the result of a SQL query into a variable in VBA?

Answer 2

这就是我做的。谢谢大家的帮助。

昏暗printRes，queryErr 设置的CmdExec =的CreateObject（ “WScript.Shell”）

消息集= cmdExec.Exec（ “SQLCMD -S ******** -U **** ***** -P -i C：\文件\ FULLPATH \ mssql.sql”）< / p>

设置queryRes = messages.StdOut

'设置queryErr = messages.StdErr

printRes = queryRes.ReadAll “printerr = queryErr.ReadAll

WScript.Echo “结果是与” ＆amp; printRes “WScript.Echo “错误是与” ＆amp; printErr

需要将sqlcmd输出分配给变量

2 个答案: