Code/Resource
Windows Develop
Linux-Unix program
Internet-Socket-Network
Web Server
Browser Client
Ftp Server
Ftp Client
Browser Plugins
Proxy Server
Email Server
Email Client
WEB Mail
Firewall-Security
Telnet Server
Telnet Client
ICQ-IM-Chat
Search Engine
Sniffer Package capture
Remote Control
xml-soap-webservice
P2P
WEB(ASP,PHP,...)
TCP/IP Stack
SNMP
Grid Computing
SilverLight
DNS
Cluster Service
Network Security
Communication-Mobile
Game Program
Editor
Multimedia program
Graph program
Compiler program
Compress-Decompress algrithms
Crypt_Decrypt algrithms
Mathimatics-Numerical algorithms
MultiLanguage
Disk/Storage
Java Develop
assembly language
Applications
Other systems
Database system
Embeded-SCM Develop
FlashMX/Flex
source in ebook
Delphi VCL
OS Develop
MiddleWare
MPI
MacOS develop
LabView
ELanguage
Software/Tools
E-Books
Artical/Document
Img_edit.asp
Package: qiyeguanli.rar [view]
Upload User: ahxunteng
Upload Date: 2022-05-16
Package Size: 1606k
Code Size: 3k
Category:
WEB(ASP,PHP,...)
Development Platform:
VBScript
- <!--#include file="bsconfig.asp"-->
- <%if Request.QueryString("no")="eshop" then
- id=request("id")
- title=request("title")
- Entitle=request("Entitle")
- img=server.htmlencode(Trim(Request("img")))
- If title="" Then
- response.write "SORRY <br>"
- response.write "请输入更新内容的标题"
- response.end
- end if
- If img="" Then
- response.write "SORRY <br>"
- response.write "内容不能为空"
- response.end
- end if
- Set rs = Server.CreateObject("ADODB.Recordset")
- sql="select * from Img where id="&id
- rs.open sql,conn,1,3
- rs("title")=title
- rs("Entitle")=Entitle
- rs("img")=img
- rs.update
- rs.close
- response.redirect "Img.asp"
- end if
- %>
- <%
- id=request.querystring("id")
- Set rs = Server.CreateObject("ADODB.Recordset")
- rs.Open "Select * from Img where id="&id, conn,3,3
- %>
- <!-- #include file="Inc/Head.asp" -->
- <BR>
- <table cellpadding="2" cellspacing="1" border="0" width="560" align="center" class="a2">
- <tr>
- <td class="a1" height="25" align="center"><strong>修改形象</strong></td>
- </tr>
- <tr class="a4">
- <td align="center">
- <br>
- <table width="550" border="0" cellspacing="0" cellpadding="0">
- <tr>
- <form method="post" name="myform" action="Img_edit.asp?no=eshop">
- <input type=hidden name=id value=<%=id%>>
- <td><div align="center">
- <table width="100%" border="0" cellspacing="2" cellpadding="3">
- <tr>
- <td width="18%" height="25" bgcolor="#C0C0C0"> <div align="right">形象名称</div></td>
- <td width="62%" bgcolor="#C0C0C0"><input type="text" name="title" maxlength="30" size="25" value="<%=rs("title")%>"></td>
- </tr>
- <tr>
- <td width="18%" height="25" bgcolor="#C0C0C0"> <div align="right">English名称</div></td>
- <td width="62%" bgcolor="#C0C0C0"><input type="text" name="Entitle" maxlength="30" size="25" value="<%=rs("Entitle")%>"></td>
- </tr>
- <tr>
- <td height="22" bgcolor="#E3E3E3"><div align="right">形象证书</div></td>
- <td bgcolor="#E3E3E3"><input name="img" type="text" id="img" value="<%=rs("img")%>" size="30" maxlength="50">
- <font color="#FF0000"> * 图片地址</font></td>
- </tr>
- <tr>
- <td height="25" colspan="2" bgcolor="#C0C0C0">
- <div align="center">
- <input name="submit" type="submit" value="确定">
-
- <input name="reset" type="reset" value="从来">
- </div></td>
- </tr>
- <tr>
- <td colspan="2">图片上传</td>
- </tr>
- <tr>
- <td colspan="2"><div align="center">
- <iframe name="ad" frameborder=0 width=100% height=48 scrolling=no src='../WebEdit/Upload_File.asp'></iframe>
- </div></td>
- </tr>
- </table>
- </div></td>
- </form>
- </tr>
- </table>
- <br>
- </td>
- </tr>
- </table>
- <BR>
- <%htmlend%>