| | |
| |
Active Server Pages ASP ASP.NET .aspx .ascx Web HTML Developer Internet Microsoft Web Services Visual Studio .NET CJWSoft ASPProtect ASPBanner ASPClassifieds
(Advanced)
(Components)
(Database)
(General)
(Vbscript)
|
|
|
|
Subject: |
ORA-00936: missing expression. |
|
From: |
Harlan |
|
Date: |
1/27/1999 1:21:44 PM |
|
IP: |
206.222.20.2 |
Im writing an activex dll, and having some
problems with ado and recordsets. Ill post
my code and the error.
Here is my code:
Public Function Detail(intProductLine) As String
my code never has errors, this is for looks ;)
On Error GoTo ErrorHandler
open the database
Call DBOpen
make sure the datbase is open
If DbIsOpen Then
Dim mSQL As String
get the year to date items
Dim sqlPid As String
sqlPid = "Select distinct substr(product_id,1,4) as model from bill_lines where " & _
"product_line = " & intProductLine & " and where substr(invoice_date,8,2) > " & _
Right(Date, 2) - 1
create the recordset object
Dim rsPid As New ADODB.Recordset
rsPid.Source = sqlPid
rsPid.ActiveConnection = DB
rsPid.CursorType = adOpenForwardOnly
rsPid.LockType = adLockReadOnly
open the recordset up!
Call rsPid.Open
make sure its not emply
If rsPid.EOF And rsPid.BOF Then
Detail = errNoneFound
End If
this will be a nested query when the first recordset works! :(
Do While Not rsPid.EOF
sSQL = "Select quantity,line_amt,invoice_date from bill_lines where product_id " & _
"like " & rsPid("Model") & "%"
this is here for testing my recordset that isnt working..
tempDetail = tempDetail & rsPid("Model") & vbctrl
these arent the droids your looking for, move along.
rsPid.MoveNext
Loop
close the recordset (yeah the one that wont open!)
rsPid.Close
Else
ut oh, the database isnt open..
Detail = errUnknown
End If
Call DBClose
return whatever it is that should be returned
Detail = tempDetail
dont wanna go into the error handler..
Exit Function
of course this doesnt get used.. ;)
ErrorHandler:
Debug.Print Err.Number; Err.Description
End Function
Here is the error.
The error is on the rsPid.Open line
[Oracle][ODBC Oracle Driver][Oracle OCI]ORA-00936: missing expression. |
Follow Up - Re: ORA-00936: missing expression. (one down, or new one?) - Harlan 1/27/1999 2:59:12 PM
|
|
|
|
|
|
