On Error Resume Next
Err.Clear

Set m_ISWiProject = CreateObject("IswiAuto16.ISWiProject") 


 

strFile = Wscript.Arguments(0) 
ver = Wscript.Arguments(1) 
verToDisplay = Wscript.Arguments(2)
WScript.Echo "arguments: " & strFile & " " & ver

m_ISWiProject.OpenProject strFile 

WScript.Echo "m_ISWiProject.OpenProject " & strFile 

m_ISWiProject.ProductVersion = ver

WScript.Echo "m_ISWiProject.ProductVersion =  " & ver 

m_ISWiProject.ProductName = "RHEV-Tools " & verToDisplay

WScript.Echo "m_ISWiProject.ProductName =  " & "RHEV-Tools " & verToDisplay 
m_ISWiProject.SaveProject

WScript.Echo "m_ISWiProject.SaveProject" 
 

m_ISWiProject.CloseProject

WScript.Echo "m_ISWiProject.CloseProject" 