viewuser.asp

来自「职位管理 用户管理 登陆管理 工作管理 信息管理」· ASP 代码 · 共 64 行

ASP
64
字号
<%@ Language=VBScript %>
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<BODY>
<FORM action="" method=POST id=form1 name=form1>
<%
if Request.ServerVariables("http_method")="GET" then
	set conn=server.CreateObject("adodb.connection")
	conn.ConnectionString="dsn=findjob"
	conn.Open 
	strsql="select * from userinfo where user='" & Request.QueryString("user") & "'"
	set sqlresult=conn.Execute(strsql)
%>
<P align=center><STRONG><FONT color=slateblue face=幼圆 
size=5>个人具体资料</FONT></STRONG></P>

<P align=center><STRONG><FONT color=crimson face=幼圆 
size=4>姓 名:<%=sqlresult("username")%></FONT></STRONG>

<P align=center>
<TABLE border=0 cellPadding=1 cellSpacing=1 height=300 
style="HEIGHT: 250px; WIDTH: 496px" width=496>
    
    <TR>
        <TD>性别:<%=sqlresult("usersex")%></TD>
        <TD>年龄:<%=sqlresult("userage")%></TD></TR>
    <TR>
        <TD>学历:<%=sqlresult("userlevel")%> </TD>
        <TD>专业:<%=sqlresult("usermajor")%></TD></TR>
    <TR>
        <TD>求职意向:
        <TD colSpan=2>1. <%=sqlresult("job1")%>
    <TR>
        <TD>
        <TD colSpan=2>2. <%=sqlresult("job2")%>
    <TR>
        <TD colSpan=3>联系地址:<%=sqlresult("addr")%>
    <TR>
        <TD colSpan=3>
            <DIV align=center><STRONG><FONT face=幼圆>个人简历</FONT></STRONG></DIV>
    <TR>
        <TD colSpan=3>
        <PRE><%=sqlresult("resume")%></PRE>
    <TR>
        <TD colSpan=3></TD></TR></TABLE></P>
<INPUT type="submit" value="初步录用" id=submit1 name=submit1>
<INPUT type="hidden" id=h1 name=user value=<%=sqlresult("user")%>>
<INPUT type="hidden" id=h1 name=username value=<%=sqlresult("username")%>>
</FORM>
	<%conn.Close 
	set conn=nothing
	%>
<%
else
	if session("namelist")="" then
		session("namelist")="'" & Request.Form("user") & "'"
	else
		session("namelist")=session("namelist") & ",'" & Request.Form("user") & "'"
	end if
	Response.Write "<b>初步录取了" & Request.Form("username") & "</b><br>"
	Response.Write "<a href='viewalluser.asp?page=1'>返回查看所有人才<a>"
end if
%>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?