SQL Server 2005全文检索技术在网站上的应用实录（二）

CREATE FULLTEXT INDEX ON TableName KEY INDEX PK_IndexName ON  DB WITH CHANGE_TRACKING AUTO
ALTER FULLTEXT INDEX ON TableName ADD ColumnName

/*
找资本全文索引开发过程
*/
CREATE PROCEDURE USP_CaptialInfo_FullIndex
(
@TableViewQueryName Varchar( 1024 ), --传入的查询字符窜
@SearchKeyword  nvarchar(100), --传入的查询关键字
@SelectStr  Varchar( 500 ),  --选择列字符串
@Criteria  Varchar( 8000 ), --查询条件
@Sort   Varchar( 255 ),  --排序字符串
@FristTopNum  int,   --显示的第一页置顶的数目
@Page   bigint OUTPUT  ,  --显示的当前页号
@CurrentPageRow bigint,   --页大小(显示多少行)
@TotalCount  bigint output,  --通过该查询条件，返回的查询记录的总页数
@Totaltimes  bigint output  --所有搜索时间，以秒为单位
)
as
DECLARE @starttime datetime,
@endtime datetime
SELECT  @starttime = getdate()

IF  ISNULL(@SearchKeyword,'') !='' OR  RTRIM(@SearchKeyword)!=''
BEGIN
SET @TableViewQueryName =
' SELECT  '+
' ROW_NUMBER() OVER (ORDER BY RANK DESC) AS SerialNumber ,'+
' F.[rank], '+
' p.*' +
' FROM '+
' FREETEXTTABLE( CapitalInfoFactTab , (ProvinceName, CityName,
CountyName, Keyword,Title ,IndustryBName , shortcontent, ComAbout , ComBreif) ,
'+ ''''+@SearchKeyword+ ''''+') AS f '+
' INNER JOIN   CapitalInfoFactTab   AS p  '+
' ON f.[key] = p.infoID '

EXEC [USP_GetFrontDataList_ByFullIndex] @TableViewQueryName,
@SearchKeyword, @SelectStr, @Criteria, @Sort, @FristTopNum,
@Page OUTPUT , @CurrentPageRow , @TotalCount OUTPUT
END ELSE BEGIN

EXEC dbo.GetFrontDataList 'dbo.ProjectInfoFactTab', 'InfoID',
@SelectStr,@Criteria,@Sort,0, @Page output, @CurrentPageRow,
@TotalCount output
END
SELECT  @endtime = getdate()
SELECT  @Totaltimes  = DATEdiff(Ms, @starttime ,@endtime)
RETURN

CREATE PROCEDURE [dbo].[USP_GetFrontDataList_ByFullIndex]
(
@TableViewQueryName  Varchar( 1024 ),

--Table或View或者Query的名字或字符串
@Key    Varchar( 50 ),  --关键字
@SelectStr   Varchar( 500 ),   --选择列字符串
@Criteria   Varchar( 8000 ),--查询条件
@Sort    Varchar( 255 ), --排序字符串
@FristTopNum   INT,      --显示的第一页置顶的数目
@Page    BIGINT  OUTPUT, --显示的当前页号
@CurrentPageRow  BIGINT,  --页大小(显示多少行)
@TotalCount   BIGINT OUTPUT   --通过该查询条件，返回的查询记录的总页数
)
AS

SET NOCOUNT ON

if charindex(';',@Criteria)>0 or charindex('--',@Criteria)>0 or charindex('/*',

@Criteria)>0 or
charindex('*/',@Criteria)>0 or charindex('syscolumns',@Criteria)>0  or

charindex('sysfiles',@Criteria)>0
or charindex('char(124)',@Criteria)>0  or charindex('1=1',@Criteria)>0
RETURN

DECLARE @TotalStr  nVarchar(4000)
DECLARE @Str   nVarchar(4000)
DECLARE @TopRowNum bigint
IF  @SelectStr IS NULL AND
RTRIM(LTRIM(@Criteria)) = ''
SET @SelectStr = '*'
IF @FristTopNum IS NULL AND @FristTopNum < 0
BEGIN
SET @FristTopNum = 0
END
ELSE IF @FristTopNum > @CurrentPageRow
BEGIN
SET @FristTopNum = @CurrentPageRow
END

IF  @CurrentPageRow > 0
BEGIN
IF @Criteria IS NOT NULL AND
RTRIM(LTRIM(@Criteria)) <> ''
BEGIN
SET  @TotalStr = 'SELECT @TotalCount=COUNT(*) FROM  ' +

'('+ @TableViewQueryName   +')'+ ' T '
+ ' WHERE ' + @Criteria
END
ELSE
BEGIN
SET  @TotalStr = 'SELECT @TotalCount=COUNT(*) FROM ' +

'('+@TableViewQueryName  +')'+ ' T '
END
PRINT @TotalStr
EXEC  sp_ExecuteSql @TotalStr, N'@TotalCount bigint output',@TotalCount output

SET @TotalCount = @TotalCount + isnull(@FristTopNum  ,0)
DECLARE @TotalPage bigint
SET @TotalPage = @TotalCount/@CurrentPageRow
IF @TotalCount%@CurrentPageRow > 0
BEGIN
SET @TotalPage = @TotalPage + 1
END
IF @Page <= 0
BEGIN
SET @Page = 1
END
IF @TotalPage > 0 AND
@Page > @TotalPage
BEGIN
SET @Page = @TotalPage
END

--组织查询语句
SET  @Str =  'SELECT   ' +   @SelectStr + ' FROM (' +

@TableViewQueryName  + ') T WHERE  T.SerialNumber >' +
cast ((@Page-1)  as varchar(10)) + '*' +cast( @CurrentPageRow as varchar(10))+

' AND T.SerialNumber <= '+
cast (@Page  as varchar(10)) + '*' +cast( @CurrentPageRow as varchar(10))

IF @Sort IS NOT NULL ANDRTRIM(LTRIM(@Sort)) <> ''
BEGIN
IF @Criteria IS NOT NULL AND  RTRIM(LTRIM(@Criteria)) <> ''
BEGIN
SET  @Str = @Str +   ' AND (' + @Criteria + ') ORDER BY '+@Sort
END
ELSE
BEGIN
SET  @Str = @Str +   ' AND  (' + @Criteria + ') ORDER BY '+@Sort
END
END
ELSE
BEGIN

IF @Criteria IS NOT NULL AND   RTRIM(LTRIM(@Criteria)) <> ''
BEGIN
SET @str = @str +  ' AND (' + @Criteria + ')  '
END

END
--对无记录时当前页数的处理
IF @TotalCount=0
BEGIN
SET @Page = 0
END
END

EXEC  sp_ExecuteSql @Str