asp ´æ´¢¹ý³Ì£¨·ÖÒ³£©
CREATE PROCEDURE sp_newpage
@tb varchar(50), --±íÃû
@col varchar(50), --°´¸ÃÁÐÀ´½øÐзÖÒ³
@coltype int, --@colÁеÄÀàÐÍ,0-Êý×ÖÀàÐÍ,1-×Ö·ûÀàÐÍ,2-ÈÕÆÚʱ¼äÀàÐÍ
@orderby bit, --ÅÅÐò,0-˳Ðò,1-µ¹Ðò
@collist varchar(800),--Òª²éѯ³öµÄ×Ö¶ÎÁбí,*±íʾȫ²¿×Ö¶Î
@pagesize int, --ÿҳ¼Ç¼Êý
@page int, --Ö¸¶¨Ò³
@condition varchar(800),--²éѯÌõ¼þ
@RecordCount Int Output,
@pages int OUTPUT --×ÜÒ³Êý
AS
/*
¹¦ÄÜÃèÊö£º¶ÔÖ¸¶¨±íÖÐÂú×ãÌõ¼þµÄ¼Ç¼°´Ö¸¶¨ÁнøÐзÖÒ³²éѯ£¬·ÖÒ³¿ÉÒÔ˳Ðò¡¢µ¹Ðò
²éѯ¿ÉÒÔÖ¸¶¨Ò³´óС¡¢Ö¸¶¨²éѯÈÎÒâÒ³¡¢Ö¸¶¨Êä³ö×Ö¶ÎÁÐ±í£¬·µ»Ø×ÜÒ³Êý
×÷ Õߣºpbsql
°æ ±¾£º1.10
×îºóÐ޸ģº2004-11-29
*/
DECLARE @sql nvarchar(4000),@where1 varchar(800),@where2 varchar(800)
IF @condition is null or rtrim(@condition)=''
BEGIN--ûÓвéѯÌõ¼þ
SET @where1=' WHERE '
SET @where2=' '
END
ELSE
BEGIN--ÓвéѯÌõ¼þ
SET @where1=' WHERE ('+@condition+') AND '--±¾À´ÓÐÌõ¼þÔÙ¼ÓÉÏ´ËÌõ¼þ
SET @where2=' WHERE ('+@condition+') '--Ô±¾Ã»ÓÐÌõ¼þ¶ø¼ÓÉÏ´ËÌõ¼þ
END
SET @sql='SELECT @pages=CEILING((COUNT(*)+0.0)/'+CAST(@pagesize AS varchar)+
') from '+@tb+@where2
EXEC sp_executesql @sql,N'@pages int OUTPUT',@pages OUTPUT--¼ÆËã×ÜÒ³Êý
SET @sql='SELECT @RecordCount=COUNT(*) from '+@tb+@where2
EXEC sp_executesql @sql,N'@RecordCount int OUTPUT',@RecordCount OUTPUT--¼ÆËã×ܼǼ
IF @orderby=0
SET @sql='SELECT TOP '+CAST(@pagesize AS varchar)+' '+@collist+
' from '+@tb+@where1+@col+'>(SELECT MAX('+@col+') '+
' from (SELECT TOP '+CAST(@pagesize*(@page-1) AS varchar)+' '+
@col+' from '+@tb+@where2+'ORDER BY '+@col+') t) ORDER BY '+@col
ELSE
SET @sql='SELECT TOP '
Ïà¹ØÎĵµ£º
2007Äê11ÔÂ05ÈÕ ÐÇÆÚÒ» ÉÏÎç 03:47
ºÜ¶à±à³ÌÈËÔ±ÔÚ¿ª·¢µÄʱºò¶¼ÈÏΪ£¬¸ÄÁËmdbºó׺Ϊaspºó¾ÍÄÜ·ÀÖ¹Êý¾Ý¿â±»ÏÂÔØ£¬ÕâÖÖÏë·¨ÊÇ´íÎóµÄ£¡ÏÂÃæµÄʵÑé¾ÍÊÇÖ¤Ã÷£¡
ÎÒÔÚ×Ô¼ºµÄµçÄÔÉÏ×öµÄ²âÊÔ£¬ÊÂÏÈÒѾ½¨Á¢ÁËÐéÄâĿ¼xinwen£¬Êý¾Ý¿âÎļþnxnew.mdb·ÅÔÚÁËÍøÕ¾µÄdataÎļþ¼ÐÏÂÃæ¡£
Ê×ÏÈ£¬½«nxnew ......
Function LoseHtml(ContentStr)
Dim ClsTempLoseStr,regEx
ClsTempLoseStr = Cstr(ContentStr)
Set regEx = New RegExp
regEx.Pattern = "<\/*[^<>]*>"
regEx.IgnoreCase = True
regEx.Global = True
ClsTempLose ......
Ò»°ãÀ´Ëµ±àÊý¾Ý¿âÀàµÄ³ÌÐòÖ÷ÒªÒª½â¾öµÄÎÊÌâÎÞ·ÇÊÇÌí¼Ó£¬É¾³ý£¬Ð޸ĺͲéѯ¡£ÕâÀà±à³Ì¶¼·Ç³£µÄ¼òµ¥¡£½ÓÏÂÀ´ÎÒÀûÓÃÒ»µã¿ÕÓàʱ¼ä·¢Ò»¸öº¯ÊýÀïÃæ°üº¬ºÍÌí¼ÓºÍɾ³ý¹¦ÄÜ¡£ÊµÑéµÄ¼Ü¹¹¿ÉÒÔʹÓÃIIS.5WEB·þÎñÆ÷ACCESSÊý¾Ý¿â¡£Õâ¸öÎÒÆäʵ²»ÓÃ˵µÄºÜÏêϸÁË£¬ÒòΪ´ó¼Ò¶¼Ó¦¸ÃÖªµÀµÄ¡£ÎÒ¾ÍÖ±½Ó°Ñº¯ÊýÌù³öÀ´¡£´ó¼ÒÖ»ÒªÉÔÎ ......
ÓÉÓÚ¹¤×÷ÔÒò£¬±ÊÕß¾³£ÐèҪʹÓÃAsp¿ª·¢Ò»Ð©Ð¡ÐͳÌÐò£¬ÔÚWindows 2000Ï¿ª·¢ºÍʹÓÃÏà¹Ø³ÌÐòʱһ°ã²»»á³öÏÖʲôÎÊÌ⣬²¢ÇÒÒ²ºÜÈÝÒ×½â¾ö¡£µ«ÊÇÓÉÓÚ±ÊÕßΪÁ˳¢ÏÊʹÓÃÁËWindows 2003 Serverʱ£¬¿ª·¢Ïà¹Ø³ÌÐò¾Í³öÏÖÁËÕâÑùÄÇÑùµÄÎÊÌ⣬±ÈÈçä¯ÀÀÆ÷²»ÄÜÏÔʾÏêϸ³ö´íÐÅÏ¢£¬Á¬½ÓAccessʱ×ÜÊDZ¨´íµÈ£¬ÈñÊÕ߿಻¿°ÑÔ¡£ÔÚ¶à´Îʵ¼ùºÍ²é¿´ ......
µÚ¶þ¸öÖØÒªµÄÀà,×÷ÓÃÊÇÀàÐÍת»»,ÀàÃûCon_Convert.ÔÚÒ³Ãæ´úÂëµÄ¿ªÍ·ÊµÀý»¯,¶ÔÏóÃûΪConvert,½èÓÃÁË.netµÄÀàÐÍת»»µÄ¶ÔÏóÃû³Æ.
Õâ¸öÀàÖ÷Òª½â¾öÔÚÀàÐÍת»»Ê±,Èç¹ûÖ±½ÓʹÓÃÀàÐÍת»»º¯Êý,»áÒòΪ±äÁ¿Îª¿Õ»òÕ߸ñʽ²»¶Ô¶øµ¼Ö³ÌÐò±¨´í,¶øÕâÖÖ±¨´ ......