ASP编写一个简单的网络后台(关键代码部分)

就是你在后台添加“标题,内容”,然后前台显示“标题” 点击“标题”即可进入相应的“内容”,提供关键代码就可以啦。

我来写一个
联接代码等其余代码省略...
显示新闻标题页面主代码模块

<table width="767" border="0" cellpadding="0" cellspacing="0">
<tr><td> </td>
<td align="left"></br>
</br>
<table width="426" border="0" cellspacing="0" cellpadding="0">

<%
dim rs
set rs=server.CreateObject("adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1

'下面的是分页代码,如果新闻不多可以不用分页
rs.pagesize=15
page=cint(request("page"))
if page<1 then
page=1
end if
if page>rs.pagecount then
page=rs.pagecount
end if
page=rs.absolutepage

'下面循环显示出新闻的标题和添加的时间
do while not rs.eof '假如不是空集,然后显示

%>
<tr >
<td width="234">·<a href="products/newsshow.asp?id=<%=rs("id")%>" class="ZITI" target="_blank"><%=cutstr(rs("title"),20,"...")%></a></td>
<td width="192" align="right">[<%=rs("time")%>]</td>
</tr>
<%rs.movenext '指针移动到下一打记录
loop '记录循环%>
</table>
</table>

显示新闻内容页面主要代码:

<table width="767" border="0" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" cellpadding="0" cellspacing="0">

<tr>
<td height="25" colspan="2" align="center">
<%dim rs
set rs=server.createobject("adodb.recordset")
sql="select * from news where id=" &request.querystring("id") '接收一个页面传递过来的新闻ID值,显示新闻内容
rs.open sql,conn,1,1
%>

</br><div><%=rs("title")%></div></br><table width="700" height="25" border="0" cellpadding="0" cellspacing="0" bgcolor="#F5F5F6">
<tr>
<td align="right> </td>
</tr>
</table>
</table>

希望你能看的明白。
温馨提示:内容为网友见解,仅供参考
第1个回答  2009-08-02
首先呀连接数据库。
自己包含conn.asp文件
set rs=server.CreateObject("adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1
添加:
rs.addnew
rs("标题")="今天你喝了吗?"
rs("内容")="巨人脑黄金,谁喝谁知道?"
rs.update

前台
do while not rs.eof
response.write "<a a href='show.asp?id=" & rs("id") & ">" & rs("标题") & "</a>"

rs.movenext
loop
编写个show.asp文件
ID=trim(request("id"))
sql="select * from news where Id=" & id
rs.open sql,conn
response.write rs("标题") & chr(13)
response.write rs("内容")
rs.close
set rs=nothing
大概就是这么个过程,全是关键代码,看明白自己就会写了。
不看明白粘都不知道往哪粘。
忘了说了,这是对数据库操作的。

ASP的网站后台登录管理程序怎么写(简单的就可以)?
alert(" 你使用的是Netscape浏览器,可能会导致无法使用后台的部分功能。建议您使用 IE6.0 或以上版本。");} else if (app.indexOf('Microsoft') != -1) { if (verStr.indexOf("MSIE 3.0")!=-1 || verStr.indexOf("MSIE 4.0") != -1 || verStr.indexOf("MSIE 5.0") !=...

asp 用ASP怎么做网站后台,提交表单时用什么ASP代码
asp代码的确是在服务器上面执行的,它既可以对服务器上面的文件和数据库进行操作,也可以向用户的浏览器传送html代码。你的问题确实无法回答,你的网站后台需要实现什么功能呢?提交表单据我所知只有2种方式:1. 标签内的 点击这个按钮可以向表单指定的页面提交表单内所有input框的内容。2. 就是使用...

ASP.NET入门教程 10.4 创建后台代码文件[1]
再次强调Default aspx是后台代码文件自动创建的惟一文件 如果创建另一个WebForm 则必须确保在Separate File选项中选中Place Code 该选项在默认情况下未选中 ( )首先返回Default aspx文件并添加两个Label控件 一个TextBox控件 和一个Button控件 调整源HTML代码 如下所示 <asp:Label ID= Label runat= serve...

ASP编程中 我做一个简单的管理员登陆后台的服务器端代码时 不知道哪里...
例如在上例中,F2单元格内的数值虽然显示为48,但实际存放的却是48.45,自然得出了48.45*1.36=65.90的结果(按计算要求应为65.28)。

如何编写网站后台网站后端怎么做
关键是你设计数据库,里面字段的功能要设计好。然后方便做后台工作。只要控制好这些,就ok了。举个简单的例子,比如要设置主页显示,可以添加一个字段own,将其值设为1,主页就会显示,设为0就不会显示。后台的作用是修改自己字段的值。如何修改自己网站后台管理地址,现在的后缀为Admin\/index.asp?去...

asp新增id后台代码怎么写
1、自动编号(我们假设字段名为recordID)2、添加记录格式: Rs.Open table,Cn,1,3注意模式为: 1,33、newlD = rs.Fields("recordlD")4.newID为刚添加的记录的ID值。

求ASP后台代码调用ASP.net的网页并用POST传值的代码示例
ASP的代码好久没写了,你的要求要用XmlHttp对象实现,可以参考:http:\/\/hi.baidu.com\/mmforever\/blog\/item\/f16ad0c86b325a147e3e6f3c.html 下面是asp.net调用其它页面(asp或asp.net)的,你参考一下吧:string postData = "user=123&pass=456"; \/\/ 要发放的数据 byte[] byteArray = ...

请问哈,那能找到个简单的整站ASP源代码,有基本的功能就可以,后台好操作...
第一个: 留言内容:<%=rs("connet")%> ...<a href="del.asp?id=<%=rs("id")%>" style="text-decoration: none">删除...我要留言... 把上面的改成

ASP.NET查询按钮后台代码怎么写?、
很简单啊,你把身份证号、准考证号作为url的参数,用Response.Redirect("xxx.aspx?idcard=" + xxx.Text + "&no=" +xxx.Text);这样就可以跳转都第二页去查询了。

ASP后台代码求助-删除网站里的一个文件夹
再建立个asp文件delupload.asp 内容是 < On Error Resume Next '目录删除 function FolderDelete(folder)If not objFSO.FolderExists(folder) Then objFSO.DeleteFolder(folder)FolderDelete="Succeeded"else FolderDelete="NotFound"end if end function '文件删除 function FileDelete(filename)If obj...

相似回答
大家正在搜