Active Server Page (ASP) 常見問題[12]

</html>

dsn = session("dsn")
dbuser = session("dbuser")
dbpass = session("dbpass")
dbtable = session("dbtable")
dbfield = session("dbfield")
dbwhere = session("dbwhere")
%>
<form action=adoselect.asp method=post>
<table>
<tr><td><b>you are authenticated as: </td>
<td><font color=green><% =
request.servervariables("logon_user")%></td></tr>
<tr><td><b>your ip address is: </td>
<td><font color=green><% =
request.servervariables("remote_addr")%></td></tr>
<tr><td><b>system dsn:</td>
<td><input type=text name=datasource value="<% = dsn %>"></td></tr>
<tr><td><b>username:</td>
<td><input type=text name=username value="<% = dbuser %>"></td></tr>
<tr><td><b>password:</td>
<td><input type=password name=password value="<% = dbpass
%>"></td></tr>
<tr><td><b>table:</td>
<td><input type=text name=table value="<% = dbtable %>"></td></tr>
<tr><td><b><font color=red>where</td>
<td></td></tr>
<tr><td><b>field to query:</td>
<td><input type=text name=field value="<% = dbfield %>"></td></tr>
<tr><td><b>value to query:</td>
<td><input type=text name=where value="<% = dbwhere %>"></td></tr>
</table>
<input type=hidden name=requesttype value="post">
<input type=submit value="query database">
<hr>
</form>
<%

else
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
'% 執行 query to database
'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

' %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
' % request datsource 從之前的form
' % 詏定 session 變數因此可以讀取這個值作為下次查詢使用
' %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

dsn = request("datasource")
session("dsn") = dsn

' %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
' % request username 從之前的form
' % 詏定 session 變數因此可以讀取這個值作為下次查詢使用
' %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

dbuser = request("username")
session("dbuser") = dbuser

' %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
' % request password 從之前的form
' % 詏定 session 變數因此可以讀取這個值作為下次查詢使用