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 ......
¶ÔÓÚÈý²ã¼Ü¹¹µÄ¸ÅÄîÐÔÒâÒå,ÍøÂçÉÏÓкܶàרÎÄ̽ÌÖ,ÈôÏëÉîÈëÁ˽â,¿ÉÒÔ×ÔÑ°½â´ð.±¾ÎĽö×÷ΪһÖÖÓ¦ÓÃÐÔ̽ÌÖ,½²µÄ¸ü¶àµÄÊÇʵÏÖµÄϸ½Ú.
¼òµ¥µØ½²,Èý²ã¼Ü¹¹Êǽ«´úÂë°´Æä×÷Ó÷ֳÉÈý²¿·Ö,ÿ²¿·Ö½â¾ö×Ô¼º¸ºÔðµÄÁ÷³Ì.
´Ó±íÈëÉî,·Ö±ðÊÇ:
½çÃæ²ã-UI&nb ......
<input type="submit" name=""byt id="byt" value="ÏÖ½ðÏúÊÛÌá½»" >
ÀýÈ磺±íµ¥ÖÐÓÐÒ»¸öÃûΪ byt µÄ°´Å¥£¬ÒªÇóÍøÒ³´ò¿ª1Ãëºó£¬×Ô¶¯µã»÷°´Å¥£¬
·½·¨£º°ÑÈçÏ´úÂë¼ÓÔÚ</form>ºó¡£
<script language="javascript">
function window.onload()
{
setTimeout("document.form1.byt.click()",1 ......
ÓÃASPʵÏÖ¶þ¼¶ÓòÃû
Òª´ïµ½¶þ¼¶ÃûµÄЧ¹û£¬±ØÐëÒ»ÏÂÌõ¼þÒÔ¼°Á÷³Ì£º
1¡¢±ØÐëÓÐÒ»¸ö¶¥¼¶ÓòÃû£¬¶øÇÒ´ËÓòÃû±ØÐë×öºÃ·º½âÎö²¢×öºÃÖ¸Ïò¡£
2¡¢±ØÐëÓÐһ̨¶ÀÁ¢µÄ·þÎñÆ÷¡£·º½âÎöµÄÓòÃûÖ¸Ïò¸Ã·þÎñÆ÷¡£
3¡¢ÔÚ·þÎñÆ÷ÉϵÄIIS½¨Ò»¸ö¿ÕµÄÖ÷»úÍ·ÃûµÄwebÕ¾µã¡£
4¡¢½«Ä¬ÈϵÄÒ³ÃæÉèÖÃΪÄãµÄ¶þ¼¶½âÎö³ÌÐ ......