📄 pro_type.asp

📁 一个企业网站的php源代码

💻 ASP

字号:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="open.asp" -->
<!--#include file="checkadmin.asp" -->
<%
fsort=Request.form("fsort")
modsort=Request.form("modsort")
if fsort<>"" and modsort<>"" then
 SQL="UPDATE pro_type Set pro_name='"&modsort&"' where pro_name='"&fsort&"'"
 con.Execute SQL
 SQL="Update product Set  pro_name='"&modsort&"' where pro_name='"&fsort&"'"
 con.Execute SQL
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<style type="text/css">
<!--
@import url(font.css);
-->
</style>
</head>

<body><table width="100%">
<form method="post"  action="pro_type.asp">
<tr> 
        <td><div align="right" class="en">修改产品名称</div></td>
        <td><select name="fsort" id="fsort" onClick="this.form.modsort.value=this.options[this.selectedIndex].text">
			 <%
		Set rs=Server.CreateObject("ADODB.RecordSet")
			SQL="select * from pro_type "
			rs.Open SQL,con,1,1
		for i=0 to rs.RecordCount-1
				
					Response.Write("<option value="""&rs("pro_name")&""">"&rs("pro_name")&"</option>")
					
			rs.movenext
			next
			rs.Close
			Set rs=nothing
		%>
          </select>
        <input name="modsort" type="text" id="modsort" size="25"> 
        <input name="modf" type="submit" id="delf3" value="修改"></td>
      </tr></form></table>
	  
</body>
</html>
<!--#include file="close.asp" -->

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -