Application("visual_exe") = Request.ServerVariables("APPL_PHYSICAL_PATH") & "Visual_Unit.exe" Set Executor = Server.CreateObject("ASPExec.Execute") Executor.Application = Application("visual_exe") Executor.Parameters = "1, " & t_Exp_path & ", " & t_filename & ", " & t_user_id & " Executor.ShowWindow = True StrResult = Executor.ExecuteWinApp
Dim Pass_Value as object Pass_Value = Command() aArr = Split(Pass_Value, ",") Menu_Opt = aArr(0)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)