ASPÈçºÎ¼ÆËãÖÐÓ¢ÎÄ»ìºÏ×Ö·û´®³¤¶ÈºÍ½ØÈ¡×Ö·û´®
ÓÃASP×öÍøÕ¾µÄʱºò¾³£»áÅöµ½Òª½ØÈ¡×Ö·û´®µÄÇé¿ö¡£ASPÖеÄLenº¯Êý²»¹ÜÊÇÖÐÎÄ×Ö·û£¬»¹ÊÇÓ¢ÎÄ×Ö·û£¬Í³Í³°´Ò»¸öµ¥Î»À´¼ÆË㣬ÓÉÓÚÒ»¸öÖÐÎÄ×Ö·ûµÄ¿í¶ÈÊÇÒ»¸öÓ¢ÎÄ×Ö·û¿í¶ÈµÄÁ½±¶£¬ÔÚÖÐÓ¢ÎÄ»ìºÏµÄÇé¿öÏÂ×Ö·û´®Êµ¼ÊÕ¼ÓõĿí¶È¾Í²»ºÃ¼ÆËãÁË£¬Èç¹û°´ÕÕLenº¯Êý¼ÆËãµÄ³¤¶ÈÀ´½ØÈ¡×Ö·û´®½Ø³öÀ´µÄЧ¹ûÒ²»á³¤¶Ì²»Ò»£¬ÏÂÃæÊÇ°´ÕÕÒ»¸öºº×ÖÏ൱ÓÚÁ½¸öÓ¢ÎÄ×Ö·ûÀ´¼ÆËã×Ö·û´®³¤¶ÈºÍ½ØÈ¡×Ö·û´®µÄ´úÂë
¼ÆËãÖÐÓ¢ÎÄ»ìºÏ×Ö·û´®µÄ³¤¶È£º
function getStringLen(str)
on error resume next
dim l,c,i,t
l=len(str)
t=l
for i=1 to l
c=asc(mid(str,i,1))
if c>=128 or c<0 then t=t+1
next
getStringLen=t
if err.number<>0 then err.clear
end function
½ØÈ¡×Ö·û´®£º
function getSubString(str,Length)
on error resume next
dim l,c,i,hz,en
l=len(str)
if l<length then
getSubString=str
else
hz=0
en=0
for i=1 to l
c=asc(mid(str,i,1))
if c>=128 or c<0 then
hz=hz+1
else
en=en+1
end if
if en\2+hz>=length then
exit for
end if
next
getSubString=left(str,i) & "…"
end if
if err.number<>0 then err.clear
end function
Ïà¹ØÎĵµ£º
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = false '²»ÏÔʾ¾¯¸æ
'xlApp.Application = false ......
'--------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<script>
function checkAll(){
for (i=0;i<document.forms[1].length;i++){
if (document.forms[1][i].tagName= ......
<%
Function Zodiac(birth)
If IsDate(birth) Then
birthyear = Year(birthday)
ZodiacList = Array("ºï", "¼¦", "¹·", "Öí", "Êó", "Å£", "»¢", "ÍÃ", "Áú", "Éß", "Âí", "Ñò")&nbs ......
Ö±±¼Ö÷Ìâ.
Ä¿Ç°ÔÚά»¤Ò»Ì×´óÐ͵ÄASPÊÛºóϵͳ(2000¶à¸öasp page),´úÂëÊÇ2001Äê³öÀ´µÄ,ÆÚ¼ä¶àÄêδ×ö¸üÐÂ,´úÂëÖвÎÔÓ¶à¸ö³ÌÐòÔ±µÄ·ç¸ñ,½á¹¹ÉÏÖ»ÊǼòµ¥µÄ½«main function ¼¯ÖÐÆðÀ´,½«¸´ÔÓµÄsql¼¯ÖÐÆðÀ´. Ò³ÃæÉÏÏ൱»ìÂÒ.
ûÓмòµ¥µØȥתÏò.net»·¾³,ÒòΪÕâ¸öÏµÍ³Ê¹Ó ......
ASPÖÐÈçºÎÓÃJS´Ó×Ó´°¿Ú´«µÝÖµ±äÁ¿µ½¸¸´°¿Ú±íµ¥ÖÐ?
ÐüÉÍ·Ö£º15 - ½â¾öʱ¼ä£º2008-6-10 00:06
¸¸´°¿ÚÖÐÓÐÒ»±íµ¥,ÏÖÔÚÊǵã±íµ¥ºóµÄÉÏ´«´ò¿ª×Ó´°¿Ú,¾¹ýÎÞ×é¼þÉÏ´«Îļþ³É¹¦ºó×Ó´°¿ÚÌáʾ³É¹¦,²¢ÓÃresponse.write(FileName) Êä³ö·¾¶³É¹¦.µ«ÈçºÎ´«µÝµ½¸¸´°¿ÚÎı¾ÓòÄÚÌá½»Êý¾Ý¿âÄØ?²é×ÊÁÏÊÇÓÃJS»Ø´«Ð´³É: resp ......