?? edit.asp
字號(hào):
<html>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<head>
<title>用戶管理</title>
<link rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {font-size: 12px}
.style3 {color: #FF0000}
.style6 {font-size: 14px}
.style8 {
font-size: 18px;
font-weight: bold;
color: #0000FF;
}
.style9 {font-size: 18px}
.style7 { font-size: 18px;
color: #0000FF;
}
-->
</style>
</head>
<!--#include file="conn.asp"-->
<%
'畢業(yè)設(shè)計(jì):林林在線網(wǎng)絡(luò)招聘系統(tǒng)
'畢業(yè)設(shè)計(jì):林林在線網(wǎng)絡(luò)招聘系統(tǒng)
if session("user")="" then
Response.write("<center>使用錯(cuò)誤,請(qǐng)先登陸")
Response.End
end if
%>
<%
dim id,user
dim rs, sql,rs1
user=session("user")
id=session("id")
set Rs1 = Conn.Execute("select * from cominfo where com='"&session("user") &"'")
if rs1.eof then
Response.write("<center>您還沒(méi)有登記,請(qǐng)先登記")
Response.End
end if
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from cominfo where com='"&session("user")&"'"
rs.Open sql,conn,1,1
%>
<body>
<table width="496" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td scope="col"><div align="center"><span class="style9">
<%
Response.Write "<table width='100%' border='0' cellpadding='2' cellspacing='1' bgcolor='#CCCCCC'>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><span class='style9'>修改資料</span><FORM METHOD='POST' TARGET= '_self' ACTION='../com/editok.asp'></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<TD><span class='style1'>公司/單位名稱:<input id='text1' name='comname' style='height:21px;width:103px' value='"&rs("comname")&"'><span class='style3'>*</span></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<TD><span class='style1'>地址:<input id='text12' name='addr' style='height:21px;width:103px' value='"&rs("addr")&"'><span class='style3'>*</span></TD>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><span class='style1'>電話:<input id='text13' name='phone' style='height:21px;width:103px' value='"&rs("phone")&"'><span class='style3'>*</span></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><span class='style1'>E-mail:<input id='text14' name='email' style='height:21px;width:103px' value='"&rs("email")&"'></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
%>
<td><span class="style1">請(qǐng)選擇分類:
<select class="smallSel" name="classid" size="1">
<%
dim sel
dim classid
classid=request.querystring("classid")
set rs2=server.createobject("adodb.recordset")
sql="select * from jobs"
rs2.open sql,conn,1,1
if rs2.eof and rs2.bof then
response.write "Not record."
else
do while not rs2.eof
if classid=cstr(rs2("classid")) then
sel="selected"
else
sel=""
end if
response.write "<option " & sel & " value='"+CStr(rs2("classID"))+"' name=classid>"+rs2("class")+"</option>"
rs2.movenext
loop
end if
rs2.close
set rs2=nothing
%>
</select>
</td>
<%
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><span class='style1'>想要的人才:<input id='text16' name='want1' style='height:21px;width:223px' value='"&rs("want1")&"'><span class='style3'>*</span></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><span class='style1'>想要的其它人才:<input id='text17' name='want2' style='height:21px;width:203px' value='"&rs("want2")&"'></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><span class='style1'>公司/單位簡(jiǎn)介:<span class='style3'>*</span><br><textarea name='introduce' id='textarea4' style='height:135px;width:434px'>"&rs("introduce")&"</textarea></td>"
Response.Write "<tr bgcolor='#EEEEEE'>"
Response.Write "<td><INPUT TYPE='SUBMIT' VALUE='修改資料'></td></FORM>"
%>
</td>
</tr>
</table>
<%
rs.Close
set rs=Nothing
conn.Close
set conn=Nothing
%>
</body>
</html>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -