易截截图软件、单文件、免安装、纯绿色、仅160KB

淘特搜索引擎在淘特Asp Cms下的应用


1、首先下载淘特站内搜索引擎,首先要导入CMS中的数据到搜索引擎索引中,这个工作您可以放到本地来做,索引后,直接将淘特搜索引擎文件夹压缩后上传到您的空间上即可。
2、数据索引说明:
3、首先在本地部署一个asp.net环境,然后安装淘特站内搜索引擎,假如访问地址是:http://localhost。
4、下面输入地址:http://localhost/reset.aspx 进行数据库的索引初始化,见下图:
如上图所示,填写好CMS数据库连接字符串,点击“连接数据库”,提示成功后,可以看到“选择索引的表”下拉框中有许多表,选择CMS内容存放的表:news,然后在“当前表中的字段”可以看到news表中的字段记录,这是为我们方便左侧的字段映射填写而显示。
5、目前淘特站内搜索引擎提供了8个索引字段,分别是:ID,标题、栏目ID、缩略图、摘要、详细内容、修改日期、链接地址,然后我们根据news 表中的字段情况,填写对应搜索引擎中的字段名称,如上图所示。
6、字段对应填写好以后,点击“开始执行索引”,根据您数据库中文章数量的不同情况,因为软件将执行文章内容的分词、索引操作,花费一定的时间后,就完成了搜索引擎的数据索引工作。
7、输入网址http://localhost 测试数据查询情况。可以看到数据库中的内容已索引到站内搜索引擎中了
8、接口的增加
打开CMS文件夹,找到admin/news_add_ok.asp
在第235行的:call add_data(file_path) 后面增加一行,代码如下:
 ''''''''''''''''''''''
'参数配置
''''''''''''''''''''''
Const SearchPortal="http://localhost/totindex.aspx" '淘特搜索引擎索引接口地址
Const IndexKey="totsearchengine01"   '接口访问key,请通过搜索引擎中的web.config查找
'==================================================================
' 提交数据
'==================================================================
Function PostHttpPage(loginUrl,loginActUrl,PostData,CharSets)
    Dim xmlHttp
    Dim RetStr     
    Set xmlHttp = CreateObject("Microsoft.XMLHTTP") 
    xmlHttp.Open "POST", loginActUrl, False
    XmlHTTP.setRequestHeader "Content-Length",Len(PostData)
    xmlHttp.set


相关文档:

asp实现批量录入数据

请看如下源代码:
<%
'向数据库写入数据
SUB writeData()
dim recCnt,i
dim fieldName1,fieldName2,fieldName3
dim conn
dim sqlStr,connStr
connStr="Provider=SQLOLEDB.1;Initial Catalog=myDatabase;Data Source=myhon;User Id=sa;PASSWORD="
set conn=Server.CreateObject("ADODB.Connection")
c ......

放入conn.asp中(拒绝攻击 万能Asp防注入代码)


放入conn.asp中(拒绝攻击 万能Asp防注入代码)
放入conn.asp中(拒绝攻击 万能Asp防注入代码)
第一种:
squery=lcase(Request.ServerVariables("QUERY_STRING"))
sURL=lcase(Request.ServerVariables("HTTP_HOST"))
 
SQL_injdata =":|;|>|<|--|sp_|xp_|\|dir|cmd|^|(|)|+|$|'|copy|format|and|exec| ......

简单的ASP防刷新图标计数器代码

<%
    dim db
set db=Server.CreateObject("Adodb.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.Mappath("../mdb/count.mdb")
dim strSql,rs,visitNum
strSql="Select visitNum from counter "
SET rs=db.Execute(strSql)
   if session("agai ......

asp页面自动跳转

最简单的做法是在页面的<head></head>标签中加入以下代码:
<meta http-equiv="Refresh" content="10;url='xxx.asp'">
这样就会在页面打开后10秒钟跳转到xxx.asp了。
也可以用javascript的settimeout来完成,在页面中加入以下代码:
<script language=javascript>
var the_timeout = setTime ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号