2009年4月28日 星期二

MySQL 及 MsSQL 隨機選出資料

MySQL

select * from MyTable order by RAND()

MsSQL

select * from MyTable order by NEWID()

Access

select * from MyTable order by RND(數值型的列名稱)

以 ASP 去除 HTML TAG 的用法 ( 如同 PHP 的 strip_tags )

<%

'====
Function stripTags( strToStrip )
'====
Dim objRegExp

strToStrip = Trim( strToStrip & "" )
If Len( strToStrip ) > 0 Then
Set objRegExp = New RegExp
objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern= "<[^>]+>"
strToStrip = objRegExp.Replace(strToStrip, "")
Set objRegExp = Nothing
End If
stripTags = strToStrip
End Function

str="<p>Test paragraph.</p><!-- Comment --> <a href='#fragment'>Other text</a>"
response.write stripTags( str )

%>