Problem while setting value from Database.

[sudhirzpatil]

Hi I am trying to put Login and Password into Login window of flight application.
I am importing these values directly from database.
Agent NAme get inserted but password is not getting .
It gives following error

The operation cannot be performed.

My code is as below

Code:

dim con,rs set con=createobject("adodb.connection") set rs=createobject("adodb.recordset") con.open"provider=sqloledb.1;server=sudhirp;uid=sa;pwd=sa@123;database=First" rs.open"select * from QTP",con Do until rs.eof SystemUtil.Run "C:\Program Files\HP\QuickTest Professional\samples\flight\app\flight4a.exe","","C:\Program Files\HP\QuickTest Professional\samples\flight\app\","open" Dim arr i=0 arr=rs.fields("Login_name") pwd=rs.fields("Password") dialog("Login").Activate dialog("Login").WinEdit("Agent Name:").Set arr dialog("Login").WinEdit("Password:").Set pwd dialog("Login").WinButton("OK").Click If window("Flight Reservation").Exist Then reporter.ReportEvent micPass,"Valid Password","Flight Reservation Window Exists" else reporter.ReportEvent micFail,"InValid Password","Flight Reservation Window doesn't Exists" End If window("Flight Reservation").Close rs.movenext Loop rs.close con.close Set rs=nothing Set con=nothing

I am getting error at following line

Code:

dialog("Login").WinEdit("Password:").Set pwd.

[bfakruddin]

I was already given some info about this question please visit vbscripting forum.. and check Problem in Database connection