<%@ Language=VBScript %>
征稿启事
<%
set rscom=server.CreateObject("adodb.recordset")
s="select * from integrade where itype=0 and inew=1 "
rscom.Open s,cn,adOpenKeyset ,adLockReadOnly
if rscom.EOF and rscom.bof then
companyinfo="没有详细公司简介"
else
companyinfo=rscom.Fields("content")
companyinfo=replace(companyinfo,space(1)," ")
companyinfo=replace(companyinfo,vbcrlf," ")
end if
%>
