📄 client_design.asp

📁 客户管理crm xitong ,希望能给你带来帮助

💻 ASP

字号:

<!--#include file="../function/connect.asp"-->
<!--#include file="../function/function.asp"-->
<%
    client_ID=request("client_ID")
    if client_ID="" then
    	client_ID=session("client_ID")
    else
    	session("client_ID")=client_ID
    end if
    if client_ID="" then
    	response.write "参数错误"
    	response.end
    end if
    
    strTable="1"
    dim User(5)
    dim Dict(5)
	
    strsql="select * from clients where client_id=" & client_ID
    'response.write strsql
    Set objRs = Server.CreateObject("adodb.recordset")
	objRs.Open strsql,objConn,1,1
	if not objRs.eof then
		client_memo=objrs.fields("client_memo")
		for j=0 to 4
			User(j)=objRs.fields("User" & (cint(strTable)+j))
			Dict(j)=objRs.fields("Dict" & (cint(strTable)+j) & "_ID")
		next
	end if
%>
<html>
<head>
<title>财务</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="../cssD.css" rel=stylesheet>
</head>

<body>
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolorlight='#000000' bordercolordark='#FFFFFF'>
  <form name="form1" method="post" action="../function/UpdateToDB.asp?InsertTable=clients&ModifyID=<%=client_ID%>&ModifyIDName=client_id&RedirectUrl=../clients/client_design.asp?client_ID=<%=client_ID%>">
  <%for i=0 to 4%>
  <tr> 
    <td height="22"><div align="right"><%=getDicValue("Dict" & cint(strTable)+i)%></div></td>
    <td height="22"><%getDic cint(strTable)+i,Dict(i)%></td>
    <td height="22"><div align="right"><%=getDicValue("User" & cint(strTable)+i)%></div></td>
    <td height="22"><%getUserField cint(strTable)+i,User(i)%></td>
  </tr>
  <%next%>
  <tr> 
    <td height="22">
	<div align="right">备注：</div></td>
    <td height="22" colspan="3"><textarea name="client_memo" cols="75" rows="6" class="input" ><%=client_memo%></textarea></td>
  </tr>
  <tr> 
    <td height="22">
<div align="right">&nbsp;</div></td>
    <td height="22" colspan="3"><input type="submit"  value="  确定  " class="button">
        <input type="reset" value="  重设  " class="button"></td>
  </tr>
  </form>
</table>
</body>
</html>
<script>
	function Openwin(str)
	{
		window.open(str,"","left=100,top=100,Width=500,Height=400,scrolling=yes");
	}
</script>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -