行者大哥，麻烦你来看一下！ - Dreamweaver及网页制作

» 互动论坛 » Dreamweaver及网页制作 » 行者大哥，麻烦你来看一下！

跳转到：

每页显示15条 1/2 << <12 > >>

我按上面的代码加入显示出URL错误。请问该写入什么代码才会正常显示呢？我的数据库名为news.asp，

图片如下：

图片如下：

主题: 行者大哥，麻烦你来看一下！

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
注册：2002/12/8 17:57:31

引用

#12003/4/13 14:20:48

我的问题还是没有解决，所以只好再来打扰呢
我在首页中加入的一个方框，想让其显示动态的新闻内容，动态新闻的主页面内容连接为/list_b.asp?b_id=4，我该如何把其中的内容使在图片中的部位显示呢？我加入了下面的代码：

">
<%=rs1("n_title")%>

{ 在指尖上绽放的花朵 }
职务：普通成员
等级：5
金币：14.0
发贴：3209
注册：2002/7/25 21:24:11

引用

#22003/4/13 14:33:40

引用:
我该如何把其中的内容使在图片中的部位显示呢？

图片中的什么部位？

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
注册：2002/12/8 17:57:31

引用

#32003/4/13 14:37:50

不好意思，因为图片太大我没传。

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
注册：2002/12/8 17:57:31

引用

#42003/4/13 14:39:38

这是图片
图片如下：

{ 在指尖上绽放的花朵 }
职务：普通成员
等级：5
金币：14.0
发贴：3209
注册：2002/7/25 21:24:11

引用

#52003/4/13 14:47:10

……/list_b.asp?b_id=4

不能单纯的这样呀……

实现显示所有b_id=4的内容，要用到SQL语句的。

select * from news where b_id=4

{ 在指尖上绽放的花朵 }
职务：普通成员
等级：5
金币：14.0
发贴：3209
注册：2002/7/25 21:24:11

引用

#62003/4/13 14:52:33

顺手写了一个，不是很精致……　希望能对你有所帮助。

<%
dim asp   
dim connstr
on error resume next
connstr="DBQ="+server.mappath("[color=blue]你的数据库名[/color]")+";DRIVER={Microsoft Access Driver (*.mdb)};"
%>

  <%
  sql="[color=red]select * from news where b_id=4[/color]"
  set asp = Server.CreateObject("ADODB.Recordset")
  asp.open sql,connstr,3,1

  do while not asp.eof
  %>
    
<%
asp.movenext
loop
asp.close
set asp = nothing
%>

	　[color=blue]按照表的格式填写[/color]

编辑历史:[这消息被行者编辑过(编辑时间2003-04-13 14:53:16)]

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
注册：2002/12/8 17:57:31

引用

#72003/4/13 14:53:45

但是我首页中加了另一个动态的页面显示正常，它们用的不是一个数据库。
其代码如下：
<%
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
Path = "Data Source=" & Server.MapPath("good/goods/goods.mdb")
Set conn= Server.CreateObject("ADODB.Connection")
p1=Provider&Path
conn.Open P1
Set rs = Server.CreateObject("ADODB.Recordset")
sql ="Select top 10 * From goods Order By 时间 DESC"
RS.open sql,Conn,2,2
do while not rs.eof
response.write "" &rs("品名")& "[$"&rs("价格")&"]
"
RS.MoveNext
Loop

rs.close
set rs=nothing

%>

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
注册：2002/12/8 17:57:31

引用

#82003/4/13 15:01:33

按照上面的代码，我该如何修改？

{ 在指尖上绽放的花朵 }
职务：普通成员
等级：5
金币：14.0
发贴：3209
注册：2002/7/25 21:24:11

引用

#92003/4/13 15:03:28

那么用同样的方法。

<%
Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"
Path = "Data Source=" & Server.MapPath("news.asp")
Set conn= Server.CreateObject("ADODB.Connection")
p1=Provider&Path
conn.Open P1
Set rs = Server.CreateObject("ADODB.Recordset")
sql ="select * from news where b_id=4"
RS.open sql,Conn,3,1
do while not rs.eof
[color=blue]按照个人要求不同填写[/color]
RS.MoveNext
Loop
rs.close
set rs=nothing
%>

sghwj
职务：普通成员
等级：1
金币：0.0
发贴：98
注册：2002/12/8 17:57:31