📄 compview.asp
字号:
<!--#include file="conndb.asp"-->
<html>
<head>
<title>企业信息</title>
<link rel="stylesheet" href="style.css">
</head>
<%
Dim Uname
Uname = Request.QueryString("uid")
Set rs = Server.CreateObject("ADODB.RECORDSET")
sql = "Select * From Company Where CName='"&Uname&"'"
rs.Open sql,Conn,1,3
If Not rs.EOF Then
%>
<body topmargin=0 leftmargin="2">
<p><img src="pic/epr.gif" border=0 width=580></p>
<table border="1" cellspacing="0" width="580" bordercolor="#64B9E1" bordercolorlight="#64B9E1" bordercolordark="#FFFFFF">
<tr>
<td bgcolor="#CEE7FF">用户名</td>
<td width="80%" colspan=3><%=rs("Cname")%></td>
</tr>
<tr>
<td bgcolor="#CEE7FF">公司名称</td>
<td colspan=3><%=rs("Company")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">类型</td>
<td><%=rs("Cname")%> </td>
<td bgcolor="#CEE7FF">成立时间</td>
<td><%=rs("FormTime")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">联系人</td>
<td><%=rs("Contactor")%> </td>
<td bgcolor="#CEE7FF">员工人数</td>
<td><%=rs("EmplNum")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">省份</td>
<td><%=rs("Location")%> </td>
<td bgcolor="#CEE7FF">Email</td>
<td><%=rs("Email")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">电话</td>
<td><%=rs("Telephone")%> </td>
<td bgcolor="#CEE7FF">传真</td>
<td><%=rs("Fax")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">联系地址</td>
<td colspan=3><%=rs("Address")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">邮政编码</td>
<td colspan=3><%=rs("ZipCode")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">HTTP网址</td>
<td colspan=3><%=rs("Http")%> </td>
</tr>
<tr>
<td bgcolor="#CEE7FF">公司简介</td>
<td colspan=3><%=rs("Introduce")%> </td>
</tr>
</table>
<table border="0" width="580">
<tr><td width="100%">招聘职位</td>
</tr>
<%
rs.Close
sql = "SELECT * FROM Job WHERE UserName='" & Uname & "'"
rs.Open sql, Conn, 1, 1
Do While Not rs.EOF
Response.Write "<tr><td>"&rs("JobId")&" <a href='JobView.asp?jid="&rs("JobId")&"'>"&rs("Title")&"</a></td></tr>"
rs.MoveNext
Loop
rs.Close
%>
</table>
<%
Else
Response.Write "不存在此企业信息！"
End If
%>
<p align="center"><a href="javascript:window.close()">[ 关 闭 ]</a></p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -