UC知道这个代码怎么修改,高手帮忙
来源：百度知道 编辑：UC知道 时间：2024/06/05 01:22:57
这个是一个JS调用新闻的，里面有个东西我不想要但我自己不知道怎么删除，就是把后面的那个更多新闻去掉，我刚自己删除了一下，结果整个新闻都不能显示了，（因为字数限制没法把所有代码都发上来）
<%
fRs.Open fSql,oConn,0,1
If fRs.EOF or fRs.BOF Then
TempContent=TempContent&" <tr><td>暂时没有任何信息！</td></tr>"
End If
Do While Not fRs.EOF
If Len(Trim(fRs("D_Title"))) > Cint(T_Words) Then
AtempTitle = Left(Trim(fRs("D_Title")),T_Words)&"..."
Else
AtempTitle = Trim(fRs("D_Title"))
End If
If T_Count = "ok" Then
If s_date= "ok" Then
o_Char ="["&FormatDateTime(fRs("D_AddTime"),vbshortdate)&" 浏览："&fRs("D_Hits")&"]"
Else
o_Char ="[浏览："&fRs("D_Hits")&"]"
End If
Else
If T_Date= "ok" Then
o_Char ="["&FormatDateTime(fRs(
<%
fRs.Open fSql,oConn,0,1
If fRs.EOF or fRs.BOF Then
TempContent=TempContent&" <tr><td>暂时没有任何信息！</td></tr>"
End If
Do While Not fRs.EOF
If Len(Trim(fRs("D_Title"))) > Cint(T_Words) Then
AtempTitle = Left(Trim(fRs("D_Title")),T_Words)&"..."
Else
AtempTitle = Trim(fRs("D_Title"))
End If
If T_Count = "ok" Then
If s_date= "ok" Then
o_Char ="["&FormatDateTime(fRs("D_AddTime"),vbshortdate)&" 浏览："&fRs("D_Hits")&"]"
Else
o_Char ="[浏览："&fRs("D_Hits")&"]"
End If
Else
If T_Date= "ok" Then
o_Char ="["&FormatDateTime(fRs(
TempContent=TempContent&" <div align=right><img src='images/pot_8.gif'> <a href="&RootUrl&"/News/default.asp?
cataid="& T_CataID &">更多内容</a>"
TempContent=TempContent&" </div>"
删掉以上内容!
就是把后面的那个更多新闻去掉
你知道后面那个更多新闻是什么样子，但是别人怎么知道呢？