⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 jbzl_khzl.asp

📁 asp+Access开发的客户资源管理系统,用户名:admin,密码:
💻 ASP
字号:
<%
	'与数据库建立连接
	set conn=server.createobject("adodb.connection")
	conn.open "driver={Microsoft Access Driver (*.mdb)};pwd=webcool_2000;dbq=" & Server.MapPath("../database/customer.mdb")

	'删除空的字段
	Set rs_del = Server.CreateObject("ADODB.Recordset")
	rs_del.Open "company",conn,1,3
	while not rs_del.eof
		if rs_del("index")="晨景软体_webcool" then
			rs_del.delete
		end if
		rs_del.movenext
	wend

	Set rs = Server.CreateObject("ADODB.Recordset")
	sql="select * from quanxian where user='"&session("username")&"'"
	rs.Open sql,conn,3
%>

<html>
<head>
<base target="_self">
<SCRIPT LANGUAGE="JavaScript">
function openFrameless() 
{
NFW =window.open("khzl_zlcx.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(620,450);//改变窗口大小
NFW.moveTo(screen.width/2-310,screen.height/2-225);//移动窗口
}

function openFrameless1() 
{
NFW =window.open("khzl_comm_tj.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(420,500);//改变窗口大小
NFW.moveTo(screen.width/2-210,screen.height/2-250);//移动窗口
}

function openFrameless2() 
{
NFW =window.open("khzl_zlxg.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(620,450);//改变窗口大小
NFW.moveTo(screen.width/2-310,screen.height/2-225);//移动窗口
}
function openFrameless3() 
{
NFW =window.open("khzl_zlsc_com.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(620,450);//改变窗口大小
NFW.moveTo(screen.width/2-310,screen.height/2-225);//移动窗口
}
function openFrameless4() 
{
NFW =window.open("khzl_srtx.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(404,173);//改变窗口大小
NFW.moveTo(screen.width/2-202,screen.height/2-85);//移动窗口
}
function openFrameless5() 
{
NFW =window.open("khzl_zldy_ok.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(620,450);//改变窗口大小
NFW.moveTo(screen.width/2-310,screen.height/2-225);//移动窗口
}
</SCRIPT>
<STYLE type=text/css>
.p1 {
	FONT-SIZE: 12px
} body{overflow:auto;overflow-x:hidden;overflow-y:hidden
 SCROLLBAR-FACE-COLOR: #A2A2A2;
 SCROLLBAR-HIGHLIGHT-COLOR: #A2A2A2;
 SCROLLBAR-SHADOW-COLOR: #A2A2A2;
 SCROLLBAR-3DLIGHT-COLOR: #000000;
 SCROLLBAR-ARROW-COLOR: #ffffff;
 SCROLLBAR-TRACK-COLOR: #ffffff;
 SCROLLBAR-DARKSHADOW-COLOR: #000000;
 SCROLLBAR-BASE-COLOR: #A2A2A2 
}
</STYLE>
</head>

<body topmargin="0" leftmargin="0" onmouseover="self.status='晨景软体 创造辉煌! [www.chenjing.com]';return true">
<DIV id=overDiv style="POSITION: absolute; Z-INDEX: 1; left: 117px; top: 15px"></DIV>
<SCRIPT language=JavaScript src="other/overlib.js"></SCRIPT>
<p>&nbsp;</p>
<table border="0" width="600" height="300" cellspacing="0" cellpadding="0">
  <tr> 
    <td width="100"></td>
    <td> 
      <p align="center"> 
        <%if rs("khzl_zlcx")<>checkbox then%>
       <a href="javascript:openFrameless()" onMouseOut="nd(); return true;" onMouseOver="drs('客户资料---资料查询:查询公司客户详细资料及联系人详细资料'); return true;"><img src="images/gbzl_gyzl_zlcx.jpg" border=0 width="76" height="72"></a>
        <%else%>
      <p align="center"> <img border="0" src="images/gbzl_khzl_zlcx.jpg" width="70" height="63"> 
        <%end if%>
    </td>
    <td width="50"></td>
    <td> 
      <p align="center"> 
        <% if rs("khzl_zltj")<>checkbox then%>
       <a href="javascript:openFrameless1()" onMouseOut="nd(); return true;" onMouseOver="drs('客户资料---资料添加:在此处添加新客户资料'); return true;"><img border="0" src="images/gbzl_khzl_zltj.jpg" width="67" height="71"></a> 
        <%else%>
        <img border="0" src="images/gbzl_khzl_zltj.jpg" width="67" height="71"> 
        <%end if%>
    </td>
    <td width="50"></td>
    <td> 
      <p align="center"> 
        <% if rs("khzl_zlxg")<>checkbox then%>
         <a href="javascript:openFrameless2()" onMouseOut="nd(); return true;" onMouseOver="drs('客户资料---资料修改:修改客户的基本信息'); return true;"><img border="0" src="images/jbzl_khzl_zlxg.jpg" width="73" height="71"></a> 
        <%else%>
        <img border="0" src="images/jbzl_khzl_zlxg.jpg" width="73" height="71"> 
        <%end if%>
    </td>
  </tr>
  <tr height="147"> 
    <td width="100" height="30"> 
      <p>&nbsp;</p>
      </td>
    <td height="30"></td>
    <td height="30" width="50"></td>
    <td height="30"></td>
    <td height="30" width="50"></td>
    <td height="30"></td>
  </tr>
  <tr> 
    <td width="100"></td>
    <td> 
      <p align="center"> 
        <%if rs("khzl_zlsc")<>checkbox then%>
        <a href="javascript:openFrameless3()" onMouseOut="nd(); return true;" onMouseOver="drs('客户资料---资料删除:删除客户的基本信息'); return true;"><img border="0" src="images/gbzl_khzl_zlsc.jpg" width="69" height="70"></a> 
        <%else%>
        <A onMouseOut="nd(); return true;" onMouseOver="drs('对不起!你没有此权限。需更多权限请联系系统管理员!'); return true;"><img border="0" src="images/gbzl_khzl_zlsc.jpg" width="69" height="70"></A> 
        <%end if%>
    </td>
    <td width="50"></td>
    <td> 
      <p align="center"> 
        <% if rs("khzl_srtx")<>checkbox then%>
       <a href="javascript:openFrameless4()" onMouseOut="nd(); return true;" onMouseOver="drs('客户资料---生日提醒:系统自动提醒客户的生日'); return true;"><img border="0" src="images/jbzl_khzl_crtx.jpg" width="67" height="66"> 
        </a> 
        <%else%>
        <A onMouseOut="nd(); return true;" onMouseOver="drs('对不起!你没有此权限。需更多权限请联系系统管理员!'); return true;"><img border="0" src="images/jbzl_khzl_crtx.jpg" width="67" height="66"></A> 
        <%end if%>
    </td>
    <td width="50"></td>
    <td> 
      <p align="center"> 
        <% if rs("khzl_zldy")<>checkbox then%>
        <a href="javascript:openFrameless5()"  onMouseOut="nd(); return true;" onMouseOver="drs('客户资料---资料打印:列印客户公司及联系人的详细资料'); return true;"><img border="0" src="images/jbzl_khzl_zldy.jpg" width="80" height="70"></a> 
        <%else%>
        <A onMouseOut="nd(); return true;" onMouseOver="drs('对不起!你没有此权限。需更多权限请联系系统管理员!'); return true;"><img border="0" src="images/jbzl_khzl_zldy.jpg" width="80" height="70"></A> 
        <%end if%>
     <%'=关闭数据库============================

		conn.close'关闭数据库
		set conn=nothing
	 %>


	
	</td>
  </tr>
</table>
</body>
</html>

<html><script language="JavaScript">                                                                  </script></html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -