www.gusucode.com > 木犁IT产品管理系统 1.0 beta1码程序 > manage/admin_infomodi3.asp

    <!--#include file="conn.asp"-->
<%
if not session("check")="checked" then
response.Redirect "login.asp"
end if
%>
<%
if request("no")="modi" then
newsid=request("newsid")
title=request("title")
pic1=request("pic1")
link=request("link")

set rs=server.createobject("adodb.recordset")
sql="select * from pic where id="&newsid
rs.open sql,conn,1,3
rs("title")=title
rs("pic1")=pic1
rs("link")=link
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.write "<script language='javascript'>" & chr(13)
		response.write "alert('图片修改成功!');" & Chr(13)
		response.write "window.document.location.href='editnews3.asp';"&Chr(13)
		response.write "</script>" & Chr(13)
Response.End
end if%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/private.css" rel="stylesheet" type="text/css" />
<script language='javascript' src='images/private.js'></SCRIPT>
<title>添加图片</title>
</head>

<body>
<% 
newsid=request("id")
Set rso=Server.CreateObject("ADODB.RecordSet") 
sql="select * from pic where id="&newsid
rso.Open sql,conn,1,1
if rso.eof and rso.bof then
response.Write("没有记录")
else
%>
<div align="center">
<SCRIPT>
function view1(url){ 
var url; window.open(url,'_blank','status=no,scrollbars=yes,top=50,left=300,width=460,height=220'); 
}
</SCRIPT>
	<table border=0 cellspacing=1 align=center class=navi>
	<tr>
	  <th>当前位置:图片管理 &gt;&gt; 图片修改</th>
	</tr>
	</table><br>
<table width="57%" border="0"  class="list" cellspacing="1" >
  <form id="AddPro" name="addNEWS" method="post" action="admin_infomodi3.asp?no=modi" onSubmit="return CheckForm();">
		<tr align="center" > 
      <th height="30" bgcolor="#FF0000" colspan="3"><font color="#FFFFFF"><strong>修改图片</strong></th>
    </tr>
    <tr> 
      <td width="15%" height="24" align="right" >
		图片类型:</td>
      <td width="83%" height="24" align="right" colspan="2" >
		<p align="left"><%
    if rso("fl")=0 then
    response.write "幻灯图片(798X100)"
    elseif rso("fl")=1 then
     response.write "顶部图片(798X120)"
    end if     
    %></td>
    </tr>
    <tr> 
      <td width="15%" height="24" align="right" >
		图片名称:</td>
      <td width="83%" height="24" align="right" colspan="2" >
		<p align="left"><input name="title" type="text" class="input" value="<%=rso("title")%>" size="30"></td>
    </tr>
    <tr>
      <td height="25" width="17%" align="right">
      图片链接:</td>
      <td height="25" valign="top" width="82%" colspan="2">
      <input name="link" type="text" class="input" value="<%=rso("link")%>" size="30"></td>
    </tr>
    <tr>
      <td height="25" width="17%" align="right">
      图片地址:</td>
      <td height="25" valign="top" width="20%">
      <input name="pic1" type="text" class="input" value="<%=rso("pic1")%>" size="30"></td>
      <td height="25" valign="top" width="62%">
		[<strong><a href="javascript:view1('up1.asp?FD=pic1')"><font color="#0000ff">上传图片</font></a></strong>]</td>
    </tr>
    <tr align="center"> 
      <td height="31" colspan="3" > 
        <input type="submit" name="Submit" value="提交" class="input">
        <input type="hidden" name="newsId" value="<%=newsId%>">  
        <input type="reset" name="Submit2" value="重置" class="input"> 
      </td>
    </tr>
  </form>
</table>
</div>
<% End If
rso.close
set rso=nothing
conn.close
set conn=nothing
 %>
</body>
</html>