Search results for query: *

I have a Oracle application developped in Forms 6.0 & Oarcel 12g Database, Aplication is running very well in windows 32bit perfectly, when it comes to Windows 64, it throughs error " \Orant\DBS\FMCUS.MSG not found". Is there any windows 32/64...

Invalid reference

...= "Microsoft.jet.oledb.4.0" rs.Open App.Path & "\Medrar.mdb" 'rs.Open "\\mika\medrar\Medrar.mdb" Set rr = New ADODB.recordset rr.Open "select * from Reser where Reno = '" & Combo1.Text & "'", rs, 1, 3 If rr.RecordCount = 0 Then MsgBox "No record found on query.", vbCritical, "Medrar"...

How to get ride of run Time Error'9' in Vb6

Run Time Error:438 Object Doesn't support this property or method Shows Debug in Fullreport.print

Don't mind, i am some what confused, please update my code. Thnx for Help alot I am just stucked in that place

...Private Sub cmdClose_Click() Unload Me End Sub Private Sub cmdOK_Click() Set obj = New PrinterControl obj.ChngOrientationLandscape rs.Open "select * from cheques where mata = '" & pro.Text & "' and status = '" & sta.Text & "'", con, 1, 3 If rs.RecordCount = 0 Then MsgBox "No record...

How to print a data report in Network Printer in a VB 6 application?

Worked out, but got error.http://www.mediafire.com/i/?xq13v49t6jp5ss1

Changed name of field, still same

...ADODB.recordset Fs.Open "Select role from Useraccount where username = '" & Text1.Text & "'", fd, adOpenKeyset, adLockOptimistic While Not Fs.EOF Text3.Txt = .Fields!role Fs.MoveNext Wend Fs.Close Set Fs = Nothing Call cmdOK_Click End If End Sub ********** Invalid Reference of Role

Even in local system also same problem, just blank report

...= "Microsoft.jet.oledb.4.0" 'cs.Open App.Path & "\Medrar.mdb" rs.Open "\\mika\medrar\Medrar.mdb" Set rr = New ADODB.recordset rr.Open "select * from Reser where Reno = '" & Combo1.Text & "'", rs, 1, 3 If rr.RecordCount = 0 Then MsgBox "No record found on query.", vbCritical, "Medrar"...

Its not in Code, while running report from Application

...Private Sub cmdClose_Click() Unload Me End Sub Private Sub cmdOK_Click() Set obj = New PrinterControl obj.ChngOrientationLandscape rs.Open "select * from cheques where mata = '" & pro.Text & "'", con, 1, 3 If rs.RecordCount = 0 Then MsgBox "No record found on query.", vbCritical...

Hi all I have developed a application on VB6 with Access 2003 and Datareport. while running reports i am getting error of Run time Error'9'. The system is connected in network and using network printer on that, Any suggestions to resolve this error'

...= "Microsoft.jet.oledb.4.0" 'cs.Open App.Path & "\Medrar.mdb" rs.Open "\\mika\medrar\Medrar.mdb" Set rr = New ADODB.recordset rr.Open "select * from Reser where Reno = '" & Combo1.Text & "'", rs, 1, 3 If rr.RecordCount = 0 Then MsgBox "No record found on query.", vbCritical, "Medrar"...

...= "Microsoft.jet.oledb.4.0" 'cs.Open App.Path & "\Medrar.mdb" ps.Open "\\mika\medrar\Medrar.mdb" Set ls = New ADODB.recordset ls.Open "select * from reser where reno = " & Combo1.Text & "" If ls.RecordCount = 0 Then MsgBox "No record found on query.", vbCritical, "Medrar"...

Its not SQL, VB 6 Data Reporting

...vbModal End If 'End With 'For Each obj In reportPS.Sections("PageHeaders").Controls ' If TypeOf obj Is RptTextBox Then ' obj.DataMember = rs.DataMember 'End If 'Next ******** Error Run Time Error:2147467259(80004005) Method 'Sections' of Object 'Reservation' Failed