下記のようなSHELLを作成してSCRIPT実行しましたが、
queryoutの出力結果がなにも表示されません。bcpコマンドを編集して実行すれば
出力結果は得られます。実行されているか、エラーになっているのかが不明です
aDim Shell
Dim bcpcmd
Dim rtn
Dim COUNT
Set Shell = CreateObject("WScript.Shell")
bcpcmd = "select count(*) from sys.fn_trace_gettable('C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\Log\am\log_6.trc',default) where LoginName = 'sa' and (StartTime >= '2019-01-01 00:00:00' or EndTime <= '2019-07-13 23:59:59')" & " queryout " & "C:\odbc\countfile.csv" & " -c -S" & " *********" & "-T"
'コマンドを発行
Shell.run "cmd /C ""bcp " & bcpcmd & """", 0, False
set Shell = Nothing
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
編集後のbcpコマンド
bcp "select count(*) from sys.fn_trace_gettable('C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\Log\am\log_6.trc',default) where LoginName = 'sa' and (StartTime >= '2019-01-01 00:00:00' or EndTime <= '2019-07-13 23:59:59')" queryout "C:\odbc\countfile.csv" -c -S " *********" -T
マイクロソフト コミュニティは一般ユーザー向けのフォーラムなので Msdn フォーラム が適当かと
Microsoft フォーラム を参照
移動した場合は移動した旨とそのスレッドのリンクをレス願います