% dim i,cate,page page=request.servervariables("HTTP_REFERER") set rs=server.createobject("adodb.recordset") sql="select * from news where id="&request("id")&"" rs.open sql,conn,3,3 if rs.bof and rs.eof then response.write "" else dim content content=rs("content") If content<>"" then if rs("editmode1")="ubb" then content=UbbCode(content,1) elseif rs("editmode1")="html" then content=UbbCode(content,2) end if End if %>
![]() |
![]() |
|
| © |