家で追試

ADO

adExecuteNoRecords + adCmdText



Const adExecuteNoRecords = &H00000080

Const adCmdText = &H0001
Set Cnxn = CreateObject( "ADODB.Connection" )

Cnxn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=pubs;Data Source=(local) "

Cnxn.Execute "INSERT INTO test values( 2, 'test')" ,, adExecuteNoRecords + adCmdText
'プロファイラで確認

'INSERT INTO test values( 2, 'test')

adCmdTableを指定した場合



Const adCmdTable = &H0002
Set Cnxn = CreateObject( "ADODB.Connection" )

Cnxn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;Initial Catalog=pubs;Data Source=(local) "

Cnxn.Execute "INSERT INTO test values( 3, 'test')" ,, adCmdTable
'プロファイラで確認

'select * from INSERT INTO test values( 3, 'test')


両方とも、普通に動き、正常に実行されるじゃん・・・