ASP代码调用文章显示不正常

文章没有显示在中央，而跑左边了。部分代码如下
lm2 =trim(request("lm2"))
lm=trim(request("lm"))
if lm2="" then lm2=lm
if lm="" then lm=lm2

sql2 = "select * from lm where id="&lm2
Set rs2 = Server.CreateObject("ADODB.RecordSet")
rs2.Open sql2,conn,1,1
if rs2.recordcount=0 then
sql2 = "select * from lm order by id asc"
Set rs2 = Server.CreateObject("ADODB.RecordSet")
rs2.Open sql2,conn,1,1
end if
if rs2.recordcount <> 0 then
mb=trim(rs2("mb"))
lmm=rs2("lm")&rs2("lm2")&rs2("lm3")

if mb<>"" then

sql3 = "select * from newsmb where id="&mb
Set rs3 = Server.CreateObject("ADODB.RecordSet")
rs3.Open sql3,conn,1,1
if rs3.recordcount<>0 then
listmb=rs3("listmb")
listshu=rs3("list")
tb=rs3("tb")
lmname=rs3("lmname")
newstime=rs3("newstime")
newshit=rs3("newshit")
openwindow=rs3("openwindow")
icon=rs3("icon")
listmb=replace(listmb,"$$栏目名$$",lmm)
els

具体啥问题？请帖代码
--------
这个代码不全，hi上留言你的QQ号，晚上我加你帮你解决

我觉得你的意思像是文章要截取一部分吧，然后出现html标记看起来好像乱码一样。 Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Global = True '取闭合的<> objRegExp.Pattern = "<.+?>" '进行匹配 Set Matches = objRegExp.Execute(strHTML) ' 遍历匹配集合，并替换掉匹配的项目 For Each Match in Matches strHtml=Replace(strHTML,Match.Value,"") Next RemoveHTML=strHTML Set objRegExp = Nothing End Function 可以试试