<html>
<body bgcolor="green">
<font color=black size=5>发布最新新闻消息!</font>
<form methoud="get" action="index.asp">
<font color=red size=3>
1.发布时间:<input type="text" name="postdate" size=8 onfocus="hint()"><br>
2.新闻标题:<input type="text" name="title" size=60 ><br>
3.新闻内容:<br><textarea name="content" cols="82" rows="15">
输入内容:
</textarea> </font>
<br>
<input type="submit" value="确定发布">
<input type="reset" value="取消发布">
</form>
<script language="vbscript">
function hint
msgbox"发布时间的输入格式为@@@@-@@-@@"
end function
</script>
</html>
<body bgcolor="green">
<font color=black size=5>发布最新新闻消息!</font>
<form methoud="get" action="index.asp">
<font color=red size=3>
1.发布时间:<input type="text" name="postdate" size=8 onfocus="hint()"><br>
2.新闻标题:<input type="text" name="title" size=60 ><br>
3.新闻内容:<br><textarea name="content" cols="82" rows="15">
输入内容:
</textarea> </font>
<br>
<input type="submit" value="确定发布">
<input type="reset" value="取消发布">
</form>
<script language="vbscript">
function hint
msgbox"发布时间的输入格式为@@@@-@@-@@"
end function
</script>
</html>
<form action="charu1.asp" method="post">
请搜索你想要删除的标题:<input name="name" value="3">
<input type="submit" value="提交">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from s3","dsn=q3;" %>
<%rs.pagesize=request("name")%>
<%rs.absolutepage=request("name")
%>
<%for i=1 to request("name")
%>
<tr><td><%=rs("title")%></td>
<td><%=rs("content")%></td>
<td<%=rs("postdate")%><td></tr>
<br>
<%rs.movenext
next%>
<%set cn=server.createobject("adodb.connection")
cn.open "dsn=q3;"
strsql="delete from s3 where id= '"&request("name")&"' "
%>
<%
rs.close
set rs=nothing
cn.close
set cn=nothing
%>
请搜索你想要删除的标题:<input name="name" value="3">
<input type="submit" value="提交">
<%
set rs=server.createobject("adodb.recordset")
rs.open "select * from s3","dsn=q3;" %>
<%rs.pagesize=request("name")%>
<%rs.absolutepage=request("name")
%>
<%for i=1 to request("name")
%>
<tr><td><%=rs("title")%></td>
<td><%=rs("content")%></td>
<td<%=rs("postdate")%><td></tr>
<br>
<%rs.movenext
next%>
<%set cn=server.createobject("adodb.connection")
cn.open "dsn=q3;"
strsql="delete from s3 where id= '"&request("name")&"' "
%>
<%
rs.close
set rs=nothing
cn.close
set cn=nothing
%>
作者:jackxiang@向东博客 专注WEB应用 构架之美 --- 构架之美,在于尽态极妍 | 应用之美,在于药到病除
地址:https://jackxiang.com/post/1290/
版权所有。转载时必须以链接形式注明作者和原始出处及本声明!
最后编辑: jackxiang 编辑于2008-10-7 10:14
评论列表