●EXCEL・VBA質問スレ Part2●

●EXCEL・VBA質問スレ Part2● at TECH

555:デフォルトの名無しさん
07/08/06 15:53:57
>>554
他のコードです。
Dim db As Database
Dim qd As QueryDef
Dim rs As Recordset

Set db = CurrentDb()
qd.Connect = glcnst_ODBCConnect
qd.ReturnsRecords = True
qd.ODBCTimeout = 0

SQL = "exec pro_hoge"

qd.SQL = SQL

Set rs = qd.OpenRecordset()

何か文法等間違っている箇所があるのでしょうか？
お願いします。

次ページ

続きを表示

1を表示