I have a simple page where I am trying to get a value from a textbox after I have submitted the form but request does not work.
Here is my code:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<script language=jscript>
function getUserName() {
var oNet, cInitial, startTime, sSQL;
oNet = new ActiveXObject("WScript.Network"
// Get the user name.
sUser = oNet.UserName;
frmMain.UserID.value=sUser;
}
function go(){
getUserName();
//frmMain.submit();
}
</script>
</HEAD>
<BODY onload="go();">
<form name=frmMain method=post action="index.asp">
<%
if Request("UserID" <> "" then
set cView = server.CreateObject("BPCaseMgmnt.cCaseView"
Set rs = Server.CreateObject("ADODB.Recordset"
querystring = "select * from UserAllRightsList where AllRights = '" & request("UserID" & "'"
if cView.getDataForTreeView(rs, queryString, strErr) then
session("Privilege" = IIF((rs("Settlement" = True or rs("Billing" = true), "admin", "user"
else
session("Privilege" = "user"
end if
rs.Close
' Response.Redirect "Navigate.html"
end if
%>
<table width="80%">
<tr><td><a href="index.asp" onclick="frmMain.submit();">BP</a>
<tr><td><input type=text name=UserID></tr>
</table>
</form>
</BODY>
</HTML>
Here is my code:
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<script language=jscript>
function getUserName() {
var oNet, cInitial, startTime, sSQL;
oNet = new ActiveXObject("WScript.Network"
// Get the user name.
sUser = oNet.UserName;
frmMain.UserID.value=sUser;
}
function go(){
getUserName();
//frmMain.submit();
}
</script>
</HEAD>
<BODY onload="go();">
<form name=frmMain method=post action="index.asp">
<%
if Request("UserID" <> "" then
set cView = server.CreateObject("BPCaseMgmnt.cCaseView"
Set rs = Server.CreateObject("ADODB.Recordset"
querystring = "select * from UserAllRightsList where AllRights = '" & request("UserID" & "'"
if cView.getDataForTreeView(rs, queryString, strErr) then
session("Privilege" = IIF((rs("Settlement" = True or rs("Billing" = true), "admin", "user"
else
session("Privilege" = "user"
end if
rs.Close
' Response.Redirect "Navigate.html"
end if
%>
<table width="80%">
<tr><td><a href="index.asp" onclick="frmMain.submit();">BP</a>
<tr><td><input type=text name=UserID></tr>
</table>
</form>
</BODY>
</HTML>