Moderators: gerski, enjay, williamconley, Op3r, Staydog, gardo, mflorell, MJCoate, mcargile, Kumba, Michael_N
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<%
Dim sMainQry
%>
<script language="VBScript">
Sub Scan()
Dim theform
set theform = document.forms("frmOne")
Set objShell = CreateObject("Wscript.Shell")
objshell.Exec "C:\Program Files\AgentExe\" & theform.AgentExe.Value & " ~" & theform.AgentID.Value & " ~TEST~" & theform.OrgID.Value & "~" & theform.RecordingFileName.Value & "~" & theform.ServerName.Value & "~" & theform.DBName.Value & "~"
'objshell.Exec "C:\" & theform.AgentExe.Value & " ~TEST~" & theform.OrgID.Value & "~" & theform.RecordingFileName.Value & "~" & theform.ServerName.Value & "~" & theform.DBName.Value & "~"
theform.submit()
End Sub
</script>
</HEAD>
<BODY onload="javascript:window.open('', '_self', '');">
<%
sMainQry = ""
%>
<form id="frmOne" onsubmit="javascript:window.close();">
<input type="hidden" name="AgentExe" value="<%=Request.Querystring("AgentExe")%>">
<input type="hidden" name="ServerName" value="<%=Request.Querystring("ServerName")%>">
<input type="hidden" name="DBName" value="<%=Request.Querystring("DBName")%>">
<input type="hidden" name="OrgID" value="<%=Request.Querystring("OrgID")%>">
<input type="hidden" name="AgentID" value="<%=Request.Querystring("AgentID")%>">
<input type="hidden" name="DialedPhone" value="<%=Request.Querystring("DialedPhone")%>">
<input type="hidden" name="RecordingFileName" value="<%=Request.Querystring("RecordingFileName")%>">
<button onclick="Scan" id=button1 name=button1 type=submit>Open AGENT EXE</button>
<% Response.Write(sMainQry) %>
</form>
</BODY>
</HTML>
Users browsing this forum: No registered users and 32 guests