| |
feliksny
Posts: 1
Score: 0
Joined: 7/28/2004
From:
Status: offline
|
I have the following script written, I built this script using samples found throughout this forum: Sub RunEXE() Dim wshShell As Object Set wshShell = CreateObject("WScript.Shell") Dim queue, dll, dbpwd, dbstring, dbuser, file queue = "BEIN" dll = "Queuing.dll" dbpwd = "FELIX" dbuser = "FELIX" dbstring = "DC920" file = "text.txt" wshShell.Run ("""c:\QTool.exe """ & " --queue=" & queue & " --dll=" & dll & " -p -s --dbpwd=" & dbpwd & " --dbstring=" & dbstring & " --dbuser=" & dbuser & " " & file ) Set wshShell = Nothing End Sub This macro will call EXE and store the contents of a "text.txt" file in a Oracle Queue. But what I really need is to be able to loop through rows in the excel sheet and gather all data from all columns that have values in them. Then put data from each row in the comma delimeted formatted string and store it the file, and then be able to call EXE to store contents in the file. And do this for every row. Also, I would like to know how I can create Dialog Boxes for user to enter DB Name, Password and so on. Felix, Thank you much...
|
|