|
|
下面红框里的内容必须不一样,否则就不能提交,怎样实现啊,同志们,帮我看看吧,非常感谢啊.
<%@ LANGUAGE="vbscript" %>
<!--#include virtual ="/Include/Conn.asp"-->
<!--#include virtual ="/Include/Frequent.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" type="text/css" href="test2.css">
<title>My Assets</title>
<script language="VBScript">
function action_OnClick()
form1.submit
end function
</script>
</head>
<body bgcolor="#FFFFFF">
<!--#include file ="Head.htm"-->
<p> </p>
<form action="dealpending.asp" method="post" name="form1">
<div id="body">
<%
if owner = "6720CE" or owner = "5900CE" or owner = "7477ME" or owner = "7383CE" then
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
constr="Provider=SQLOLEDB;Data Source=HZSQL01;Initial Catalog=HRDB;User ID=ReadWrite;Password=WriteRead"
conn.open = constr
rs.open "select * from Lease_equip where active =1",conn,1,1
if rs.eof or rs.bof then
response.write "There is no new equipment need you to cancel."
else
%>
<table border="1" width="100%" bordercolorlight="#FF7200" cellspacing="1" cellpadding="4" bordercolordark="#FFFFFF" bgcolor="#F3E4AD" >
<tr ><td colspan="13" align="center">
Add Function Approve
<td></tr>
<tr>
<td width="97" height="30">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica,sans-serif"><b><font size="2">Org</font></b></font></div>
</td>
<td width="97" height="30">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica,sans-serif"><b><font size="2">Contract NO</font></b></font></div>
</td>
<td width="91">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2" ><b>Equipment Description</b></font></div>
</td>
<td width="35">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Qty</b>
</font></div>
</td>
<td width="49">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Start Date<br>
</b></font></div>
</td>
<td width="39">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>End Date<br>
</b></font></div>
</td>
<td width="44">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>S/N<br>
</b></font></div>
</td>
<td width="72">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Location<br>
</b></font></div>
</td>
<td width="57">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Badge<br>
</b></font></div>
</td>
<td width="52">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Name<br>
</b></font></div>
</td>
<td width="45">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Dept<br>
</b></font></div>
</td>
<td width="57">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Asset NO<br>
</b></font></div>
</td>
<td width="86">
<div align="center"><font color="#3366FF" face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>Approve?<br>
</b></font></div>
</td>
</tr>
<tr>
<% do while not rs.eof
active = "select"&rs("autoid")
asset = "look"&rs("autoid")
'response.write autoid
response.write "<tr><td>"&rs("org")&"</td><td>"&rs("contract")&"</td><td>"&rs("equipment")&"</td><td>"&rs("Qty")&"</td><td>"&rs("startday")&"</td><td>"&rs("disabledate")&"</td><td>"&rs("serilno")&"</td><td>"&rs("location")&"</td><td>"&rs("badge")&"</td><td>"&rs("engname")&"</td><td>"&rs("dept")&"</td>"%>
<td> <input type = "text" name=<% =asset %> value = ""></td> <td><select name=<% =active %> size="1">
<option value=<% =1 %>>--------</option>
<option value=<% =2 %>>Approve</option>
<option value=<% =4 %>>Reject</option>
</select>
</td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=Nothing
conn.Close
Set conn= Nothing
end if
else
Response.Write("You have no permission to visit this website")
end if
%>
</table>
</div>
</form>
<!--#include file ="foot.htm"-->
</html> |
|
IP卡
狗仔卡
发表于 2010-1-10 03:45:15
收藏
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡
发表于 2010-3-15 02:05:04