?? saveedit.asp
字號:
<!--#include file="security.asp"-->
<!--#include file="inc/articlechar.inc"-->
<%
set conn=server.createobject("adodb.connection")
DBPath = Server.MapPath("txt97.asp")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
%>
<%
if request.form("title")="" then
response.write "錯(cuò)誤提示:請輸入文章標(biāo)題!"
response.end
end if
if request.form("content")="" then
response.write "錯(cuò)誤提示:請輸入文章內(nèi)容!"
response.end
end if
%>
<%
title=htmlencode2(request.form("title"))
content=htmlencode2(request.form("content"))
articleid=request("id")
sql="select * from learning where articleid="&articleid
rs.open sql,conn,3,3
if cint(rs("user_id"))<>cint(session("u_id")) then
response.redirect "../info.asp?msg=您沒有修改文章的權(quán)利!"
response.end
end if
rs("typeid")=Request.Form("typeid")
rs("title")=title
rs("content")=content
rs.update
rs.close
response.redirect "myarticle.asp?user_id=" & session("u_id")
%>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -