<%
sql810524="select max(id) from tr_article "
trwcmaxid810524=conn.execute (sql810524)(0)
if trwcmaxid810524>1107 then
sql810524="select id from tr_myapp where appid=16 or appname like '%版权%' "
rs.open sql810524,conn,0,1
if not rs.eof then
isok810524=true
else
isok810524=false
end if
rs.close
if not isok810524 then
response.write "<style>" & vbCrLf
response.write ".trwcsorry{width:90%; padding:50px 20px 20px 20px; line-height:30px; font-size:16px;}" & vbCrLf
response.write ".trwcsorry h3{ text-align:center; font-size:20px; }" & vbCrLf
response.write "</style>" & vbCrLf
response.write "<div class=""trwcsorry"">" & vbCrLf
response.write "<div class=""trwcsorrynr"">" & vbCrLf
response.write "<h3>源码试用结束的提示</h3>" & vbCrLf
response.write "非常抱歉的提示您：<br>" & vbCrLf
response.write "源码的试用已结束<br>" & vbCrLf
response.write "此套源码是我们精心编写的，并且已经申请国家《计算机软件著作权》，证书编号为：2016SR204636<br>" & vbCrLf
response.write "为了让我们持续发布更多好用的源码，希望您购买正版授权以表支持<br>" & vbCrLf
response.write "购买授权后您将获得我们的售后、源码升级、高级插件（自动采集、世界杯新闻采集、美女图片采集、自动搜索引擎推送、定时发布、自动发布、自动静态等百余款插件）、高级模板，一律终身免费的特权服务。<br>" & vbCrLf
response.write "购买授权后，您可终身免费使用所有我们旗下的系统，无需再次授权<br>" & vbCrLf
response.write "购买授权后，请在您网站后台--网站管理--更新缓存，此提示将自动消失，感谢您的信任与支持<br>" & vbCrLf
response.write "购买授权链接：<a href=""http://www.55tr.com/gwappshow.asp?id=11"" target=""_blank"">http://www.55tr.com/gwappshow.asp?id=11</a>" & vbCrLf
response.write "</div>" & vbCrLf
response.write "</div>" & vbCrLf
response.End()
end if
end if
%>