?? comxx.asp
字號:
<!--#include file="cn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('請先登錄!');window.location.replace('login.asp');</script>"
response.End
cn.close
set cn=nothing
end if
id=trim(request.QueryString("id"))
umane=trim(request.QueryString("name"))
set rs=server.CreateObject("adodb.recordset")
sql="select * from company where id="&id
rs.open sql,cn,1,1
if not rs.eof then
%><style type="text/css">
<!--
body,td,th {
font-size: 12px;
}
-->
</style>
<table width="600" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#B1C3D9">
<!--DWLayoutTable-->
<tr>
<td width="600" height="20" align="center" valign="top">公司<font color="#FF6600"><%=umane%></font>的詳細信息</td>
</tr>
<tr>
<td height="32" valign="top">
<form name="form1" method="post" action="changecom.asp?id=<%=id%>">
<table width="650" border="0" cellpadding="0" cellspacing="2" bgcolor="#C8D5E4">
<!--DWLayoutTable-->
<tr>
<td width="73" height="28">用戶名:</td>
<td width="154"><input name="uname" type="text" id="uname" readonly="true" value="<%=rs("uname")%>" size="15"> </td>
<td width="71">真實姓名:</td>
<td width="147"><input name="cname" type="text" id="cname" value="<%=rs("cname")%>" size="15"></td>
<td width="66" valign="top">是否審核:</td>
<td width="125" valign="top"><input name="answer" type="text" id="answer" size="15"></td>
</tr>
<tr>
<td height="25">類型:</td>
<td><input name="typ" type="text" id="typ" value="<%=rs("typ")%>" size="15"></td>
<td>有效期:</td>
<td><%=rs("ontime")%>天 增加
<select name="addt" id="addt">
<option value="0">選擇</option>
<% dim m
for m=1 to 12%>
<option value="<%=30*m%>"><%=m%>個月</option>
<%next
%>
</select> </td>
<td valign="top">聯系電話:</td>
<td valign="top"><input name="tel" type="text" id="tel" value="<%=rs("tel")%>" size="15"></td>
</tr>
<tr>
<td height="20" nowrap="nowrap">成立日期:</td>
<td><input name="ptime" type="text" id="ptime" readonly="true" value="<%=rs("ptime")%>" size="15"></td>
<td>法人:</td>
<td><input name="faren" type="text" id="faren" value="<%=rs("faren")%>" size="15"></td>
<td valign="top">傳真:</td>
<td valign="top"><input name="fax" type="text" id="fax" value="<%=rs("fax")%>" size="15"></td>
</tr>
<tr>
<td height="27">注冊資金:</td>
<td><input name="money" type="text" id="money" readonly="true" value="<%=rs("money")%>" size="15"></td>
<td>郵箱:</td>
<td><input name="email" type="text" id="email" value="<%=rs("email")%>" size="15"></td>
<td valign="top">郵編:</td>
<td valign="top"><input name="post" type="text" id="post" value="<%=rs("post")%>" size="15"></td>
</tr>
<tr>
<td height="26">登陸次數:</td>
<td><input name="times" type="text" id="times" readonly="true" value="<%=rs("times")%>" size="15"></td>
<td valign="top">聯系地址:</td>
<td colspan="3" valign="top"><input name="address" type="text" id="address" value="<%=rs("address")%>" size="35"></td>
</tr>
<tr>
<td rowspan="2" valign="top">注冊時間:</td>
<td rowspan="2" valign="top"><input name="addtime" type="text" id="addtime" readonly="true"value="<%=left(rs("addtime"),10)%>" size="15"></td>
<td height="2"></td>
<td colspan="3" rowspan="2" valign="top"><input name="http" type="text" id="http" value="<%=rs("http")%>" size="40" /></td>
</tr>
<tr>
<td height="21" valign="top">公司網址:</td>
</tr>
<tr>
<td height="43" valign="middle" nowrap="nowrap">業務范圍:</td>
<td colspan="5" valign="middle"><input name="yewu" type="text" id="yewu" value="<%=left(rs("yewu"),70)%>" size="70" /></td>
</tr>
<tr>
<td height="30" colspan="6" valign="top" bgcolor="#CCD8E6">簡介:<br>
<%=rs("inf")%></td>
</tr>
<tr>
<td height="21" colspan="6" align="center" valign="top" bgcolor="#CCD8E6"><label>
<input type="submit" name="Submit" value="確認修改">
</label>
<label>
<input type="button" name="Submit2" value="刪除此公司" onClick="window.location.replace('delcom.asp?id=<%=rs("id")%>')">
</label>
<label>
<input type="button" name="Submit" value="查看收藏" onClick="window.location.replace('userpro.asp?name=<%=rs("uname")%>')" />
<input type="button" name="Submit3" value="返回上頁" onclick="history.go(-1)" />
</label></td>
</tr>
</table>
</form></td>
</tr>
</table>
<%
else
response.Redirect("allcompany.asp")
end if
rs.close
set rs=nothing
cn.close
set cn=nothing
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -