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

📄 xtgn_yhgl.asp

📁 asp+Access开发的客户资源管理系统,用户名:admin,密码:
💻 ASP
字号:
<html>
<head>
<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>
<script language="javascript">
function openFrameless1() 
{
NFW =window.open("yhgl_tgyh.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(404,174);//改变窗口大小
NFW.moveTo(200,100);//移动窗口
}
function openFrameless2() 
{
NFW =window.open("yhgl_yhsc.asp","","fullscreen");//打开一个窗口为满屏显示
NFW.resizeTo(420,500);//改变窗口大小
NFW.moveTo(screen.width/2-210,screen.height/2-250);//移动窗口
}
</script>
<body onmouseover="self.status='晨景软体 创造辉煌! [www.chenjing.com]';return true">

<p> </p>
<%
set conn=server.createobject("adodb.connection")
	conn.open "driver={Microsoft Access Driver (*.mdb)};pwd=webcool_2000;dbq=" & Server.MapPath("../database/customer.mdb")
	Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from quanxian where user='"&session("username")&"'"
rs.Open sql,conn,3
 %>
<DIV id=overDiv style="POSITION: absolute; Z-INDEX: 1; left: 117px; top: 15px"></DIV>
<SCRIPT language=JavaScript src="other/overlib.js"></SCRIPT>
<table border="0" width="420" height="299" cellspacing="0" cellpadding="0">
<tr> 
	<td width="20%" height="103"></td>
	<td width="20%" height="103"> 
			<p align="center"> 
			<%if rs("yhgl_tjyh")<>checkbox then %>
			 <a href="javascript:openFrameless1()" onMouseOut="nd(); return true;" onMouseOver="drs('用户管理---添加用户:在此你可以添加新的用户'); return true;"><img border="0" src="images/xtgn_xtsz_tgyh.jpg" width="71" height="71"> 
			</a> 
			<%else%>
			<A onMouseOut="nd(); return true;" onMouseOver="drs('对不起!你没有此权限。需更多权限请联系系统管理员!'); return true;"><img border="0" src="images/xtgn_xtsz_tgyh.jpg" width="71" height="71"></A> 
			<%end if%>
	</td>
    
	<td width="13%" height="103"></td>
	<td width="35%" height="103"> 
			<p align="center"> 
			<%if rs("yhgl_scyh")<>checkbox then %>
			<a href="javascript:openFrameless2()" onMouseOut="nd(); return true;" onMouseOver="drs('用户管理---删除用户:在此你可以删除一个已经存在的用户'); return true;"> <img border="0" src="images/xtgn_xtsz_scyh.gif" width="68" height="68"> 
			</a> 
			<%else%>
			<A onMouseOut="nd(); return true;" onMouseOver="drs('对不起!你没有此权限。需更多权限请联系系统管理员!'); return true;"><img border="0" src="images/xtgn_xtsz_scyh.gif" width="68" height="68"></A> 
			<%end if
			set conn=nothing
			%>
	</td>
</tr>
  
<tr> 
			<td width="18%" height="29"></td>
			<td width="19%" height="29"></td>
			<td width="13%" height="29"></td>
			<td width="26%" height="29"></td>
</tr>

<tr> 
	<td width="18%" height="126"></td>
			<td width="19%" height="126"> 
			<p align="center">
	</td>

	<td width="13%" height="126"></td>
	<td width="26%" height="126"> 
	<p align="center"> 
	</td>
</tr>
</table>
</body>
</html>

⌨️ 快捷键说明

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