PDA

Click to See Complete Forum and Search --> : Different result with VB-Oracle workstation (URGENT)


Feb 14th, 2000, 02:52 AM
I have 2 (Oracle)workstation connecting to a (Oracle) server.
Condition:
# ADO Connection
# Oracle 8.0.5(Client & Server)
# Workstation : Win98
# Server : winNT (SP4)

Coding:
Private Sub ctButton1_Click()
Dim ssql As String
Dim userinfo As String
Dim ret As Long
Dim Temp As String * 50
Dim lpAppName As String, lpFileName As String, lpKeyName As String, lpString As String

'Ini files
userinfo = Text1.Text + Text2.Text
lpAppName = "DATA"
lpKeyName = "USERNAME"
lpString = userinfo
lpFileName = "Coms32"

ret = WritePrivateProfileString(lpAppName, lpKeyName, lpString, lpFileName)
If ret = 0 Then
Beep
End If

'Start verify username & password
ssql = "select * from USERPROP where USERNAME = '" & Text1.Text & "'"

Set rs = cn.Execute(ssql)
On Error GoTo err1
If Text2.Text <> rs!PASSWORD Then
MsgBox "Incorrect! Please try again"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus
Else
Menufrm.Show
Unload Me
End If
Exit Sub

err1:
MsgBox "You are not filling Username and Password or incorrect Username"
Text1.Text = ""
Text2.Text = ""
Text1.SetFocus

-------
Problem
I can view the data on the other workstation which do not have VB6 by sql 8. But in VB Application error accor....

-Khamal-

JohnAtWork
Feb 14th, 2000, 10:55 PM
Might be a silly question, but have you Packaged and Deployed the program?

Even compiled, VB programs require some sort of installation on machines that don't have VB loaded on them.

Either P&DW or a 3rd party program such as InstallShield.