Oracle FAQ | Your Portal to the Oracle Knowledge Grid |
Home -> Community -> Usenet -> c.d.o.misc -> Re: Newbie Help w/Date Value and passing to VB5
Here is a DAO sample of dates...
Dim odb As Database
Dim ody As Recordset
Set odb =
OpenDatabase(ODBC, False, False,ODBC;DSN=ORA32;UID=SCOTT;PWD=TIGER")
Set ody = odb.OpenRecordset("SCOTT.EMP", dbOpenDynaset)
ody.FindFirst "Hiredate = #03-DEC-81#"
Do Until ody.NoMatch
Combo1.AddItem ody.Fields("ENAME")
ody.FindNext "Hiredate = #03-DEC-81#"
Loop
Received on Wed Apr 29 1998 - 00:00:00 CDT