I am attempting to run a sql server stored procedure from access vba, but I keep getting an error of
Code:
Conversion failed when converting date and/or time from character string.
This is my syntax - what do I need to alter in order for this to successfully execute?
Code:
Private Sub btnConnect()
Dim cmd As ADODB.Command, d1 As String, d2 As String
Set cmd = New ADODB.Command
d1 = "'" & Me.d1 & "'"
d2 = "'" & Me.d2 & "'"
cmd.ActiveConnection = "Provider=sqloledb;Server=Server;Database=DB;Trusted_Connection=yes;"
cmd.CommandType = adCmdStoredProc
cmd.CommandText = "SQLStoredProc"
cmd.Parameters.Append cmd.CreateParameter("@d1", adVarChar, adParamInput, 255, d1)
cmd.Parameters.Append cmd.CreateParameter("@d2", adVarChar, adParamInput, 255, d2)
cmd.Execute
End Sub
ALTER Procedure [dbo].[SQLStoredProc]
(
@d1 varchar(100)
,@d2 varchar(100)
)
As
Select name, address, phone from employees where hiredate between @d1 And @d2