Hello, I'm experiencing a run-time error 3000. The following is an excerpt of the code that I'm using:
If [report selection] = 3 Then
DocName = "rptGrossFieldSummary"
Set qdfList = db.QueryDefs("qrySp_GrossFieldSummary")
strSQL = "exec sp_GrossFieldSummary'" & Application.CurrentUser & "','" & Me.Title.Value & "','" & Me.Lease_Fraction & "'"
qdfList.SQL = strSQL
DoCmd.OpenReport DocName, acNormal
The above is a simple pass-through query and report. I'm using MS Access 2003 as my front-end and Sql Server 2000 as my back-end. The code terminate while executing the DoCmd command. Can anyone tell me what I'm doing wrong. Please Advise?
Thanks,
Cliff
If [report selection] = 3 Then
DocName = "rptGrossFieldSummary"
Set qdfList = db.QueryDefs("qrySp_GrossFieldSummary")
strSQL = "exec sp_GrossFieldSummary'" & Application.CurrentUser & "','" & Me.Title.Value & "','" & Me.Lease_Fraction & "'"
qdfList.SQL = strSQL
DoCmd.OpenReport DocName, acNormal
The above is a simple pass-through query and report. I'm using MS Access 2003 as my front-end and Sql Server 2000 as my back-end. The code terminate while executing the DoCmd command. Can anyone tell me what I'm doing wrong. Please Advise?
Thanks,
Cliff