主题:  关于新闻首页调用的问题!请高手帮忙!

wancir_5d

职务:普通成员
等级:1
金币:0.0
发贴:41
#12003/1/11 12:24:22
我用dw做了一个新闻系统,但是现在我想在首页(.index)用js调用最新的10条新闻,请问我该怎么做?



wancir_5d

职务:普通成员
等级:1
金币:0.0
发贴:41
#22003/1/12 9:46:58
没有人可以回答我吗?



无色光芒

职务:普通成员
等级:3
金币:1.0
发贴:1071
#32003/1/12 11:41:24
能不能参考别人的程序是怎么作的?

顺便请教您一个问题:
我在使用一套新闻程序。它的首页调用也是用的JS,不过调用后显示的字很大,怎么改成9磅的。
附:相关源代码




gg=gg+""
<%
'on error resume next
addr0=request.servervariables("server_name")
addr1=request.servervariables("url")
addr1=replace(addr1,"dynews.asp","list.asp")
addr="http://"&addr0&addr1
addrm=replace(addr,"list.asp","")

wz=""
a=0
set rs=server.createobject("adodb.recordset")
'**************************************************调用置顶的文章
if langmu="all" then
sql="select id,tuwen,title,date,hits from wenzhang where ding=1 order by id desc"
else
sql="select id,tuwen,title,date,hits from wenzhang where langmuid="&langmu&" and ding=1 order by

id desc"
end if
rs.open sql,conn,3,1
do while not rs.eof
if acall wzlist()
else
exit do
end if
rs.movenext
loop
rs.close
'**************************************************调用一般文章
if langmu="all" then
sql="select id,tuwen,title,date,hits from wenzhang where ding<>1 order by id desc"
else
sql="select id,tuwen,title,date,hits from wenzhang where langmuid="&langmu&" and ding<>1 order by

id desc"
end if
rs.open sql,conn,3,1
do while not rs.eof
if acall wzlist()
else
exit do
end if
rs.movenext
loop
rs.close


call rsclose()
call connclose()
%>
<%'Response.Write Err.description%>
gg=gg+"<%=wz%>"
gg=gg+"
"
gg=gg+"
"
gg=gg+"更多内容..."
gg=gg+"
"
document.write (gg)