VBAのdatetimeパラメータを使用してSQL Serverストアドプロシージャを呼び出す方法はありますか。

Question

私はdatetimeデータ型の2つの入力パラメータを受け入れるSQL Serverストアドプロシージャを持っています。 Excel VBAから呼びたい

Dim spCommand As ADODB.Command 
Set spCommand = New ADODB.Command 
spCommand.ActiveConnection = cnn 
spCommand.CommandText = "myProcedureName" 
spCommand.CommandType = adCmdStoredProc 
spCommand.Parameters.Refresh 
spCommand.Parameters(1).Value = "6/1/2016"  'DateValue("2016-06-01") + TimeValue("00:00:00") 
spCommand.Parameters(2).Value = "6/1/2016"  'DateValue("2016-06-01") + TimeValue("23:59:59") 
spCommand.Execute 

しかし、私はこのエラーを取得：

は、私はそれをどのように解決することができますが、私はこのような何かを試してみたので

VBAは、日時の種類を持っていませんか？

EDIT 1
@Joeが提案何followeingした後、私は私のデバッガを開いて、これを取得するが、エラーがまだそこにある：

Answer 1

DateSerialの機能を使用します。

spCommand.Parameters(1).Value = DateSerial(2016,1,6) 

必要に応じて、オプションでTimeSerial関数：

spCommand.Parameters(2).Value = DateSerial(2016,1,6) + TimeSerial(23,59,59) 

VBA doesn't have a datetime type

はい、それがない：

Dim dtDateTime as Date 
dtDateTime = DateSerial(2016,1,6) + TimeSerial(23,59,59) 

UPDATE

あなたの編集に続いて、私はParametersコレクションは三つの項目を持っていることがわかります。最初はリターンパラメータ、2番目と3番目はadDBTimeStamp型の入力パラメータです。

また、Command.NamedParametersプロパティはfalseなので、編集に伴うスクリーンショットでは、名前付きパラメータは使用できません。あなたのパラメータを指定する必要がありますので、2つの

VBAのコレクションは、ない0、1から始まるインデックス化されている

UPDATEとして：私は上記のだと思います

spCommand.Parameters(2).Value = ... 
spCommand.Parameters(3).Value = ... 

違う。標準のVB/VBAコレクションは1から始まるインデックスが付けられています。私の見解では、1ベースのインデックスは「より直観的」であると誤解しています。

ADOが開発されたとき、Microsoftは1ベースのコレクションが間違っていると認識し、ADOコレクションを0ベースにすることにしました。これにより、標準的なコレクションと矛盾しますが、例えば、javascript開発者にとっては「直感的」です。何が一貫性のない混乱。

私が正しい（と、それは私がADOを使用するので、長い時間だ、と私はこれをテストしていない）場合は、次のものが必要です。

あなたの3265エラーを排除するが、doesnのはずです

spCommand.Parameters(1).Value = ... 
spCommand.Parameters(2).Value = ... 

」あなたの元の問題を解決する。デバッグトレースが表示され、パラメータが期待値に設定されていることが示されます。問題のストアドプロシージャの簡略化されたバージョンを含めて、MCVEを生成しようとお勧めします。