📄 savelist.asp
字号:
<%dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("mymdb/news.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
<%
dim rs,sql
t1=request("t1")
c1=request("c1")
t2=request("t2")
c2=request("c2")
t3=request("t3")
c3=request("c3")
t4=request("t4")
c4=request("c4")
t5=request("t5")
c5=request("c5")
t6=request("t6")
c6=request("c6")
t7=request("t7")
c7=request("c7")
t8=request("t8")
c8=request("c8")
addtime=date()
writer=request("writer")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from list where (id is null)"
rs.open sql,conn,1,3
rs.addnew
rs("t1")=t1
rs("c1")=c1
rs("t2")=t2
rs("c2")=c2
rs("t3")=t3
rs("c3")=c3
rs("t4")=t4
rs("c4")=c4
rs("t5")=t5
rs("c5")=c5
rs("t6")=t6
rs("c6")=c6
rs("t7")=t7
rs("c7")=c7
rs("t8")=t8
rs("c8")=c8
rs("addtime")=addtime
rs("writer")=writer
rs.update
rs.close
rs=noting
conn.close
set conn=nothing
%>
<html>
<head>
<title></title>
<link rel="stylesheet" href="images/new.css">
</head>
<body bgcolor="#FFFFFF">
<p> </p>
<table width="95%" align="center" bgcolor="#333333" cellpadding="0" cellspacing="0">
<tr><td>
<table width="100%" cellspacing="1" cellpadding="2">
<tr>
<td height="20" colspan="2" bgcolor="#ecf0ef" align="center">
<p align="center"><font color="#000000"><b>电子期刊添加成功</b></font>
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td colspan="2" align="center">
<p align="left">以下是电子期刊内容:
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center" height="24">本版编辑：</td>
<td width="74%" height="24"> <%=writer%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题1：</p>
</td>
<td width="74%" height="6"><%=t1%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c1%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题2：</p>
</td>
<td width="74%" height="6"><%=t2%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c2%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="23">
<p>标题3：</p>
</td>
<td width="74%" height="23"><%=t3%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c3%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题4：</p>
</td>
<td width="74%" height="6"><%=t4%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c4%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题5：</p>
</td>
<td width="74%" height="6"><%=t5%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c5%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题6：</p>
</td>
<td width="74%" height="6"><%=t6%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c6%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题7：</p>
</td>
<td width="74%" height="6"><%=t7%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c71%> </td>
</tr>
<tr bgcolor="#CCCCCC">
<td width="26%" align="center" height="6">
<p>标题8：</p>
</td>
<td width="74%" height="6"><%=t8%></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="26%" align="center">内容：</td>
<td width="74%"> <%=c8%> </td>
</tr>
</table>
</td></tr></table>
<%
set conn=nothing
set rs=nothing
%>
<p align="center"><a href="index.asp">返回首页</a></p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -