📄 read.asp
字号:
<!--#include file="../includes/keepHouse.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>WebOffice</title>
</head>
<body>
<center>
<table border="0" width="100%" height="50" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"></td>
</tr>
</table>
<table border="0" width="75%" cellspacing="0" cellpadding="0">
<tr>
<td width="5%" bgcolor="#0000FF" height="35" align=left><img border="0" src="../images/back.gif"></td>
<td width="65%" bgcolor="#0000FF" height="35" align=center><b><font color="#FFFFFF">
<%
call insureID()
dim CLIENT_ID
dim Submited
dim Confirmed
CLIENT_ID=request("CLIENT_ID")
Submited=request("Submited")
Confirmed=request("Confirmed")
if CLIENT_ID="" then
call trigErr()
end if
sql="SELECT Clients.ADD_DATE, Clients.COMPANY_NAME, Clients.AGENT_NAME, " _
&"Clients.EMAIL, Department.DEPARTMENT AS Department, " _
&"Clients.PHONE_NUMBER,Clients.WEB_SITE, Clients.SUBMIT_DATE, Personnel.PERSON_NAME AS PersonName " _
&"FROM Clients INNER JOIN Personnel " _
&"ON Clients.PERSONNEL_ID = Personnel.PERSONNEL_ID " _
&"INNER JOIN Department " _
&"ON Personnel.DEPT_ID = Department.DEPT_ID " _
&"WHERE (Clients.CLIENT_ID ="&CLIENT_ID&" ) "
call openDB()
rs.open sql,conn,1,1
response.write rs("Department")&"部门客户单"
if Submited="UnSubmit" then
response.write "(未提交)"
else
if Confirmed="UnConfirmed" then
response.write "(未审核)"
end if
end if
%>
</font></b></td>
<td width="5%" bgcolor="#0000FF" height="35" align=right><img border="0" src="../images/Close2.gif"></td>
</tr>
</table>
<table border="1" width="75%" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF" cellspacing="0" cellpadding="0">
<tr bgcolor="#efefef">
<td width="20%" bgcolor="#FCFCFC">公司名称：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("COMPANY_NAME")%>
</td>
</tr>
<tr>
<td width="20%" bgcolor="#FCFCFC">代理人姓名：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("AGENT_NAME")%>
</td>
</tr>
<tr bgcolor="#efefef">
<td width="20%" bgcolor="#FCFCFC">联系电话：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("PHONE_NUMBER")%>
</td>
</tr>
<tr>
<td width="20%" bgcolor="#FCFCFC">Email地址：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("EMAIL")%>
</td>
</tr>
<tr bgcolor="#efefef">
<td width="20%" bgcolor="#FCFCFC">网站地址：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("WEB_SITE")%>
</td>
</tr>
<tr bgcolor="#FCFCFC">
<td width="20%" bgcolor="#FCFCFC" >录入人员：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("PersonName")%>
</td>
</tr>
<tr bgcolor="#efefef">
<td width="20%" bgcolor="#FCFCFC" >录入日期：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("ADD_DATE")%>
</td>
</tr>
<%if Submited="Submited" and Confirmed="UnConfirmed" then%>
<tr bgcolor="#FCFCFC">
<td width="20%" bgcolor="#FCFCFC" >提交日期：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("SUBMIT_DATE")%>
</td>
</tr>
<%end if%>
<%if Submited="Submited" and Confirmed="Confirmed" then%>
<tr bgcolor="#FCFCFC">
<td width="20%" bgcolor="#FCFCFC" >审核日期：</td>
<td width="55%" bgcolor="#FCFCFC">
<%=rs("CONFIRM_DATE")%>
</td>
</tr>
<%end if%>
<tr>
<td width="75%" height=50 colspan=2 align=center bgcolor="#EFEFEF">
<%
call closeDB()
if session("POSITION_ID")=4 and request("action")="Confirm" then
response.write "[<a href=""SaveACS.asp?CLIENT_ID="&CLIENT_ID&"&action=Confirm"">通过审核</a>]"
end if
if Submited="UnSubmit" then
response.write"[<a href=""SaveACS.asp?CLIENT_ID="&CLIENT_ID&"&action=Submit"">提交</a>]"
end if
%>
[<a href="javaScript:history.back()">返回</a>]
</td>
</tr>
</table>
</center>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -