如何修改Search.asp-领先建站CMS提供服务商我们专注于CMS建站产品的研发

4227 查看	5 回复

主题：[讨论]如何修改Search.asp [收藏主题]

转到：

mbaun 当前离线

1138 主题	4 广播	1 粉丝

级别:八年级

用户积分:6229 分
登录次数:342 次
注册时间:2006/4/4
最后登录:2023/2/2

mbaun 发表于：2006/12/7 22:06:00 | 显示全部帖子查看该作者主题楼主

做线上考试培训就选#科汛网校

.....
Sub Execute()
   Response.Write "<!DOCTYPE html PUBLIC ""-//W3C//DTD XHTML 1.0 Transitional//EN"" ""http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"">" & vbcrlf
    Response.Write "<html xmlns=""http://www.w3.org/1999/xhtml"">" & vbcrlf
   Response.Write "<head>" & vbcrlf
   Response.Write "<title>搜索结果-" & KSCMS.GetConfig("WebName") & "</title>" & vbcrlf
   Response.Write "<link href=""" & KSCMS.GetConfig("InstallDir") & "images/sousuo.css"" type=text/css rel=stylesheet>" & vbcrlf
   Response.Write "<link href=""" & KSCMS.GetConfig("InstallDir") & "images/style.css"" type=text/css rel=stylesheet>" & vbcrlf

Response.Write "</head>" & vbcrlf
   Response.Write "<body>" & vbcrlf
   %>
    
   <%Response.Write "<div class=""content"">" & vbcrlf

.....

Response.Write "" & vbcrlf
   Response.Write "" & vbcrlf
   Response.Write SearchForm
   Response.Write "</div>" & vbcrlf
   %>
   
<%
' Response.Write "<div class=""footer"">" & vbcrlf
' Response.Write "<p>"& KSCMS.GetConfig("CopyRight") &" </p>" & vbcrlf
' Response.Write "<p>Powered By <a href='http://www.kesion.com'

一分钟快速开通线上知识店铺