?? adminsave2.asp
字號:
<%Admin="UserSee"%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_down.asp"-->
<%
dim id
dim logoname
dim logourl
dim logoimg
dim sql
dim rs
dim founderr
founerr=false
if trim(request.form("logoname"))="" then
founderr=true
errmsg="<li>網(wǎng)站名稱不能空</li>"
end if
if trim(request.form("logourl"))="" then
founderr=true
errmsg=errmsg+"<li>網(wǎng)站地址不能為空</li>"
end if
if trim(request.form("logoimg"))="" then
founderr=true
errmsg=errmsg+"<li>logo不能為空</li>"
end if
if founderr=false then
logoname=request("logoname")
logoimg=request("logoimg")
logourl=request("logourl")
set rs=server.createobject("adodb.recordset")
if request("action")="add" then
call newsoft()
elseif request("action")="edit" then
call editsoft()
end if
sub newsoft()
sql="select * from logo where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("logoname")=logoname
rs("logoimg")=logoimg
rs("logourl")=logourl
rs.update
end sub
sub editsoft()
sql="select * from logo where id="&request("id")
rs.open sql,conn,1,3
rs("logoname")=logoname
rs("logoimg")=logoimg
rs("logourl")=logourl
rs.update
end sub
if makejs=1 then
UpdateJs(news)
end if
set rs=nothing
conn.close
set conn=nothing
%>
<html>
<head>
<title></title>
<link rel="stylesheet" type="text/css" href="style.css">
</head>
<body bgcolor="#468ea3">
<br><br>
<table width="50%" border="0" cellpadding="3" cellspacing="1" align="center">
<tr>
<td width="100%" height="20" bgcolor="#145f74">
<p align="center"><font color="#FFFFFF">
<%if request("action")=add then%>
添加
<%else%>
修改
<%end if%>
網(wǎng)站成功</font>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#a5d0dc">
<p align="left"><br>
網(wǎng)站名稱為：<%=logoname%></p>
您可以進行其他操作
</td>
</tr>
</table>
<%
else
response.write "由于以下的原因不能保存數(shù)據(jù)："
response.write errmsg
end if
%>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -