C:\test.vbs(2, 10) Microsoft VBScript compilation error: Expected end of statement

[Indy]

Hi,
I am new to VB and have some previous programming experiences.
Curently working as an IT support person and trying to write a VB 6 script to access apos database and get one of the table's field value.

I think this is not that hard for a experience VB programmer, but I am kind a stuggling.

Can any one have a similler code for this task?

When I am compling my code I am getting an error in the first line.

Dim Conn as Connection
' public variables for the server, database, user name and password
 
Public mServer as String
Public mDb As String
Public mUsr As String
Public mPwd As String
Public mRst As New Recordset
 
'The class is as under: 
Private Sub Class_Initialize()
' initializing the class for the Server Name, Database name, user name and password for 
 
connection string
mDb = strDb
mServer= strServer
mUsr = strUserName
mPwd = strPwd
End Sub
 

error: C:\test.vbs(2, 10) Microsoft VBScript compilation error: Expected end of statement

Complier doesn't understand "as" somehow..
Do we have to import any libraries??

Can someone please help..

my emai address:mail id removed

Thanks,

[QVeen72]

Hi,

You Need to add Microsoft ActiveX DataObject 2.0 Library
(Or any Higher version available)

REgards
Veena

[Indy]

Hi,

Thanks for ur support. Can you please let me know how to do so.

Thanks
Indy

[QVeen72]

Hi,

To Add References,

Goto Menu : Project >> References
Select the above said Library and Apply

Regards
Veena