Krishna_Kumar
Contributor
Joined 6 years ago
User Profile
User Widgets
Contributions
Project Variable
Hi Team, i am trying to Create a object at run time and pass the same object for all other script. for example, in Method1 - i have created an excel object(Excel.Applilcation) in Method2 - i want to access the object which is created in Method1 without creating the object again. is it possible to store the created object in project variables and access them? please help me out. Kind Regards, KrishnaSolved1.6KViews0likes4CommentsRe: Store CSV column data in an array VBScript
Hi vikassardesai , please reffer the below code and modify as required. Function GetContentFromDB (strFileName, strSQLStatement) Dim objAdCon, objAdRs Set objAdCon = CreateObject(“ADODB.Connection”) objAdCon.Open “DRIVER={Microsoft Excel Driver (*.xls)};DBQ=”&strFileName & “;Readonly=True” If Err <> 0 Then Log.Error(“Error has occured while Creating Connection: ”) Set obj_UDF_getRecordset = Nothing Exit Function End If Set objAdRs = CreateObject(“ADODB.Recordset”) objAdRs.CursorLocation=3 objAdRs.Open strSQLStatement, objAdCon, 1, 3 While objAdRs.EOF=false For i=0 to objAdRs.Fields.count Log.Message(objAdRs.fields(i)) Next objAdRs.moveNext Wend If Err<>0 Then Log.Error(“Error occured”) Set obj_UDF_getRecordset = Nothing Exit Function End If Set objAdRs.ActiveConnection = Nothing objAdCon.Close Set objAdCon = Nothing End Function above function will take two parameters (filename with the path and query) below is the sample call method Set rsSampleRS= GetContentsFromDB(“C:\Documents and Settings\mohank\Desktop\Login.csv”, “Select [UserName] from [sheet1]”) please let me know if its working or not Kind Regards, Sathish Kumar K2KViews0likes1Comment