?? guestshow.asp
字號:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Set ObjReference = Server.CreateObject("jxc1.check")
ObjReference.myfilee()
%>
<!--#include file="../../Connections/jxc.asp" -->
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
If (Request.QueryString("id") <> "") Then
Recordset1__MMColParam = Request.QueryString("id")
End If
%>
<%
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_jxc_STRING
Recordset1.Source = "SELECT * FROM guest WHERE id = " + Replace(Recordset1__MMColParam, "'", "''") + ""
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
%>
<html>
<head>
<title>www.71base.com</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="CSS.CSS" rel="stylesheet" type="text/css">
</head>
<body oncontextmenu="return false" >
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="79%"><img src="images/icon-page.gif" width="16" height="15"><font color="#4289F4">客戶詳細信息>></font></td>
<td width="21%"><strong><font color="#6AB5FF">
<input name="imageonclick="document.execCommand('print','true','true')"" type=image onClick="document.execCommand('print','true','true')" value="打印" src="images/printpage.gif" width="16" height="16">
<input name="imageonclick="document.execCommand('saveas','true','.htm')"" type=image onClick="document.execCommand('saveas','true','.htm')" value="保存" src="images/saveas.gif" width="16" height="16">
</font></strong></td>
</tr>
</table>
<table width="99%" align="center" cellpadding="0">
<tr>
<td height="1">
<form name="form1" method="post" action="">
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#0066FF">
<tr bgcolor="#F2F2F2">
<td width="115" height="15">
<div align="right"> 客 戶 id：</div></td>
<td width="308"> <%content = Server.HTMLEncode((Recordset1.Fields.Item("id").Value))
response.write content%>
</td>
<td width="135"> <div align="right">客戶編號：</div></td>
<td width="202"> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gidcode").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td> <div align="right">客戶名稱：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gname").Value))
response.write content%>
</td>
<td> <div align="right">聯系人： </div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gperson").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#F2F2F2">
<td height="15">
<div align="right">客戶地址：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gaddress").Value))
response.write content%>
</td>
<td> <div align="right">郵政編碼：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gyoubian").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="17"> <div align="right">傳 真：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gfax").Value))
response.write content%>
</td>
<td> <div align="right">電 話1：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gtel1").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#F2F2F2">
<td height="14">
<div align="right">關 系：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gselect").Value))
response.write content%>
</td>
<td> <div align="right">電 話2：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gtel2").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="18"> <div align="right">公司網址：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gweb").Value))
response.write content%>
</td>
<td> <div align="right">開戶銀行：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gbank").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#F2F2F2">
<td height="16">
<div align="right">EMAIL ：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gmail").Value))
response.write content%>
</td>
<td> <div align="right">銀行帳號：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("gbankno").Value))
response.write content%>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="15">
<div align="right">允許信用金額：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("xinyong").Value))
response.write content%>
元</td>
<td><div align="right">已用信用金額：</div></td>
<td> <%content = Server.HTMLEncode((Recordset1.Fields.Item("xinyongover").Value))
response.write content%>
元</td>
</tr>
<tr bgcolor="#FFFFFF">
<td> <div align="right">備 注：</div></td>
<td colspan="3"> <p> <% content = Server.HTMLEncode(Recordset1.Fields.Item("other").Value)
content=replace(content,chr(13),"<br> ")
response.write content%>
</p>
<p> </p>
<p> </p></td>
</tr>
</table>
</form> </td>
</tr>
</table>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -