|
#2
天涯听雨2008-01-07 22:35
|
前几天为了文章的删除请教了大家,问题已经解决了,这次是文章的修改,我实在找不出错误来,
<%
id=request("name")
path=server.mappath("文章")
path=server.mappath(path&"/"&id&".asp")
Set conn=server.CreateObject("adodb.connection")
conn.open("driver={microsoft access driver (*.mdb)};dbq="&server.mappath("person.mdb"))
sql="select * from arti where 文章列表='"&id&"'"
set rs=conn.execute(sql)
Set fso=server.CreateObject("scripting.filesystemobject")
Set file_open=fso.opentextfile(path)
neirong=file_open.readall
%>
<html>
<head>
<title>文章修改页面</title>
</head>
<body>
<br><br>
<h3 align="center">文章修改</h3>
<br>
<hr>
<h4><%=rs("文章列表")%></h4>
<form action="do_modify.asp" method="post">
<table border=0 >
<tr>
<td>文章题目：<td width=55><input name="title" size=30 value="<%=rs(文章列表)%>"><input type="hidden" name="transfer" value="<%=rs("文章列表")%>">
<tr>
<td>文章作者：<td><input name="author" size=20 value="<%=rs(作者)%>">
<tr>
<td>文章来源：<td><input name="from" size=20 value="<%=rs(来自)%>">
<tr>
<td colspan=2>正文内容：<br>
<textarea name="wen" rows=30 cols=65><%=neirong%></textarea><p>
<tr>
<td><input type="submit" value="修改">
</table>
</form>
</body>
</html>
<%
conn.close
file_open.close
%>