sdcms在線提交的程序
代碼如下
<!--#include file="inc/conn.asp" -->
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
body,td,th {
font-size: 12px;
}
-->
</style>
<script language=javascript>
function isfull()
{
var title = document.myform.title.value;
var content = document.myform.content.value;
var classid = document.myform.classid.value;
var author = document.myform.author.value;
var code = document.myform.code.value;
if(title == "")
{
alert("標(biāo)題呢?");
document.myform.title.focus();
return false;
}
if(content == "")
{
alert("多少寫點(diǎn)內(nèi)容吧");
document.myform.content.focus();
return false;
}
if(classid == "")
{
alert("選分類哦...");
document.myform.classid.focus();
return false;
}
if(author == "")
{
alert("留下您的大名吧");
document.myform.author.focus();
return false;
}
if(code == "")
{
alert("唉,不要忘記帶驗(yàn)證馬來");
document.myform.code.focus();
return false;
}
if(classid == "")
{
alert("選分類哦...");
document.myform.classid.focus();
}
return true;
}
</script>
<%
if request("action")="add" then
If IsEmpty(Session("GetCode")) Or Session("GetCode") <> UCase(Request.Form("code")) Then
response.write "<script>window.alert('驗(yàn)證馬呢?吃草去了?本站規(guī)定,沒有馬是不得提交滴...');</script>"
response.write "<script>location.href='add.asp'</script>"
Response.End
Else
dim title,content,author,classid
title=Trim(request.Form("title"))
content=Trim(request.Form("content"))
author=Trim(request.Form("author"))
classid=Trim(request.Form("classid"))
set rs=server.createobject("adodb.recordset")
sql="select * from sd_info"
rs.open sql,conn,1,3
rs.addnew
call SaveData_dlinfo()
rs.update
rs.close
set rs=nothing
call CloseConn()
response.write"<script>alert('OK!感謝您的關(guān)注!審核后即可顯示!')</script>"
response.Redirect "add.asp"
end if
sub savedata_dlinfo
rs("title")=title
rs("content")=content
rs("author")=author
rs("classid")=classid
rs("adddate")=now
end sub
end if
%>
本站僅提供存儲(chǔ)服務(wù),所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)
點(diǎn)擊舉報(bào)。