asp开发工具4.0版下载地址:http://www.aspbc.com/soft/showsoft.asp?id=181
今天用asp开发工具生成弄修改功能,加上前三个,完成增加,删除,列表,修改的全部功能。
修改功能分两个部分:
第一,根据传来的ID,查询这条新闻的所有字段,显示到表单中。
第二,将表单中的内容,保存到数据库中。
假设新闻表单页如下图:
如果表单的字段多的话,可以通过asp开发工具中的表单选项来生成表单,然后在生成的表单上进行修改,可以省一半时间。这里大家自己动手去操作试试,很方便。
第一:我们查询一条新闻,把相关的内容并显示到表单中。这里我们需要查询
在asp开发工具上连接上数据库,点击“查询” 选项,进入查询代码生成。
【代码类型】 - 选择非函数。
【表名】- 选择news表。
【字段名】- 由于生成news的表,所以需要选择news_id,news_title,news_from,news_hits 四个字段名。
【类型】- 由于修改只修改一条新闻,所以这里选择一条
【数量】 -默认为1,不要填写其他的。
【WHERE】按纽 - 由于我们修改一条新闻,是根据新闻的ID字段(news_id)来修改的。点击where按纽进入条件选择对话框。
字段名:选择news_id
运算符:选择等于号
来 源:由于修改页面来自管理页面中,通过点击“修改”文字,通过地址参数传过来的,所以这里的来源选择querystring。
参数属性:因为地址是news_edit.asp?id=2是使用id作为参数来传的,这里填写id。这里要根据自己的参数来填写。
然后点击确定,关闭where对话框。
【sql语句】- 显示生成的sql语句,不要修改里面的任何东西,这里可以复制它段名等信息,用于其它地方。
设置如下图:
这样查询设置就好了,点击“生成代码”来得到查询的代码。把这代码粘贴到表单上面,并加上连接数据库代码和关闭数据库代码,具体代码如下:
编辑新闻页面名为:news_edit.asp
<!--#include file="../include/conn.asp"--> <% conn=openConn()'连接数据库 id = request.Querystring("id") Set Rs = Server.CreateObject("Adodb.RecordSet") sql="select top 1 news_content,news_from,news_hits,news_id,news_time,news_title from news Where 1=1 And news_id = " & id & " order by news_id asc" Rs.Open sql,conn,1,1 If Not Rs.EOF Then news_content=Rs("news_content") news_from=Rs("news_from") news_hits=Rs("news_hits") news_id=Rs("news_id") news_time=Rs("news_time") news_title=Rs("news_title") '上面的变量可以用在页面的任何地方,请注意不要重名 End if Rs.Close Set Rs = Nothing %> <body> <form id="form1" name="form1" method="post" action="news_modify.asp?id=<%=news_id%>"> 注意这里这里的action,要填写修改页面和id <table width="500" border="0" cellspacing="0" cellpadding="0"> <tr> <td>新闻标题:</td> <td><input name="news_title" type="text" id="news_title" value="<%=news_title%>" /></td> </tr> <tr> <td>新闻内容:</td> <td><textarea name="news_content" id="news_content" cols="45" rows="5"><%=news_content%></textarea></td> </tr> <tr> <td>来源:</td> <td><input name="news_from" type="text" id="news_from" value="<%=news_from%>" /></td> </tr> <tr> <td>点击数:</td> <td><input name="news_hits" type="text" id="news_hits" value="<%=news_hits%>" /></td> </tr> <tr> <td> </td> <td><input type="submit" name="button" id="button" value="提交" /></td> </tr> </table> </form> <% closeConn(conn) '关闭数据库连接 %>(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)
这样就把新闻的内容放到表单中了。
接下来我们要把修改后的结果保存到数据库中
保存修改页面名为 news_modify.asp
点击“修改”选项,进入生成修改代码。
【代码类型】 - 选择非函数。
【表名】- 选择news表。
【字段名】-这里选择要修改的字段news_title,news_from,news_hits,news_time 四个字段名。
【WHERE】按纽 - 由于我们修改一条新闻,是根据新闻的ID字段(news_id)来修改的。点击where按纽进入条件选择对话框。
字段名:选择news_id
运算符:选择等于号
来 源:由于修改页面来自管理页面中,通过点击“修改”文字,通过地址参数传过来的,所以这里的来源选择querystring。
参数属性:因为地址是news_edit.asp?id=2是使用id作为参数来传的,这里填写id。这里要根据自己的参数来填写。
然后点击确定,关闭where对话框。
然后点击“生成修改代码”,把它粘贴到一个新页面中去,加上数据库连接和关闭数据库。具体代码如下:
<!--#include file="../include/conn.asp"--> <% conn=openConn() %> <% id = request("id") news_content = trim(request("news_content")) news_from = trim(request("news_from")) news_hits = trim(request("news_hits")) news_title = trim(request("news_title")) sql="Select news_content,news_from,news_hits,news_title From news Where 1=1 And news_id = " & id & "" Set Rs = Server.CreateObject("Adodb.Recordset") Rs.Open sql,Conn,1,3 Rs("news_content") = news_content Rs("news_from") = news_from Rs("news_hits") = news_hits Rs("news_title") = news_title Rs.Update Rs.Close Set Rs =Nothing %> <% response.write "修改成功" closeConn(conn) %>(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)
保存为news_modify.asp,这样就可以了,运行一下试试 。