📄 companymanage.asp

📁 1.多种查询方式

💻 ASP

字号:

<%@ LANGUAGE="VBScript"%>
<% response.buffer=true %>
<%const title="公司信息表管理 "%>
<html>
<head>
<meta http-equiv="Content-Type"content="text/html; charset=gb_2312-80">
<meta name="GENERATOR" content="Microsoft FrontPage Express 2.0">
<title><%=title%></title>
<link rel=stylesheet type=text/css href=../data/forum.css>
</head>
<body topmargin="0">
<!--#include file=../data/myPrg.asp-->
<!--#include file=../data/connect.asp-->
<!--#include file=../data/username.inc-->
<% 
'on error resume next
Showtitle(title)
hurry = split(session("username"),";")
UserCompanyid =  hurry(0)
UserFlag = hurry(1)
User = hurry(2)
if UserFlag > 2 then
	call closedatabase
	Response.End 
end if
dim curaction, curid, bedit, founderr, errmsg
curaction = request("action")
curid = request("id")
curid = replace(curid,"'","")
'Response.Write curid
bedit = false
founderr = false
if curaction = "edit" then
	bedit = true
end if


		
 %>

<table border='0' width=90% align='center' cellspacing='0' cellpadding='0' bordercolorlight='#000000'bordercolordark='#FFFFFF'bgcolor='#DADBFC'>
<tr>
 <td align=center><img src="../images/6.gif"></td>

</table>

<p align=center>[ <a href='manage.asp'>返回</a> ]
<!--#include file=../data/copyright.asp-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -