Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

[ASPÖÐʹÓÃÈý²ã¼Ü¹¹] 5.Error´¦ÀíÀà

    ¿´µ½ÓÐÅóÓÑËµÇ°ÃæÒ»Õ½²µÃû±ØÒª,ÏëÏëҲȷʵ.±¾À´ÊÇûÓдòËã½²ÕâЩ»ù´¡µÄ,Ö»ÊÇÐÐÎÄÆðÀ´Ã»ÓÐÔ¼Êø,¾Íµ´¿ªµ½»ù´¡ÖªÊ¶ÉÏÃæÁË.
    ´ÓÕâ½Ú¿ªÊ¼,½«»á¸ø´ó¼Ò½éÉÜASPÖеÄÈý´óͨÓÃÀà,Ëü¹á´©ÓÚÎÒËùÉè¼ÆµÄÈý²ã¼Ü¹¹ÖÐ,ÊǶÔASPÓï·¨µÄÀ©Õ¹,¿ÉÒÔÌá¸ßºÜ¶àϸ½Ú´¦ÀíÉϵÄЧÂÊ,¿ÉÒÔËãÊÇÒ»µãµã¿ò¼ÜµÄζµÀ.
    ±¾½Ú½éÉÜ´íÎó´¦ÀíÀà,ÀàÃûCon_Error,ÔÚ´úÂëÒ³ÃæÖ®³õ¾Í½øÐгõʼ»¯,ʵÀýÃûΪe,ÒÔϵÄe.add ¼´Ê¹ÓøôíÎóÀàµÄʵÀý»¯¶ÔÏó½øÐвÙ×÷.
    
    
    ·½·¨½éÉÜ:
    e.Add(ByVal vErrorMessage ) ¼Ç¼һ¸ö´íÎó,²¢ÇÒÉèÖà e.Error = true . ÔÚ³ÌÐò¼ì²âÓû§ÃûºÏ·¨ÐԵȵط½·¢ÏÖ´íÎóʱ,¾Íµ÷ÓÃÕâ¸ö·½·¨,¼Ç¼һ¸ö´íÎóÐÅÏ¢.
    ÀýÈç,Óû§µÇ½ʱÃÜÂë´íÎó,Ôòµ÷Óà e.add("ÄúµÄÕ˺ŻòÃÜÂë´íÎó") .Õâʱºò,´íÎó¶ÔÏóeÖбã¼Ç¼ÁËÒ»¸ö´íÎó,´íÎó¶ÔÏóµÄÊôÐÔe.Error=true .ÔÚºóÐø²Ù×÷ÖÐ,¿ÉÒÔʹÓôíÎó¶ÔÏóµÄÕâ¸öÊôÐÔ½øÐÐÅжÏ.
    ÀýÈç:
    ³öÏÖ´íÎóºóµ¯³öС´°¿ÚÌáʾ´íÎó,²¢·µ»ØÇ°Ò»Ò³.
    if e.Error then
        e.Alert_Back "ÇëÖØÐµÇ¼!"  'Alert_Back µÄ×÷ÓÃÔÚºóÃæ½éÉÜ.
    end if
    
    e.Alert_Back(ByVal vMessage) ʹÓÃJavascriptµ¯³öÒ»¸ö´íÎóÌáʾ¿ò,ÏÔʾĿǰËùÓеĴíÎóÁбí,Alert_Back(vMessage)ÖеÄvMessageÏÔʾÔÚ×îºóÒ»ÐÐ,ÓÃÓÚÌáʾÓû§ÔÚ¿´µ½Õâ¸ö´íÎóÐÅÏ¢ºóÐèÒª²ÉÈ¡µÄ²½Öè.  ²¢ÇÒ·µ»Øµ½Ç°Ò»Ò³. Õâ¸ö·½·¨µÄ´úÂëÌù³öÀ´,´ó¼Ò»á¸üºÃÀí½â:
    Public Sub Alert_Back(ByVal vMessage)
        strJSMessage = JSMessage & vMessage     'JSMessageÓÃÓÚ´æ´¢e¶ÔÏóÖеĴíÎóÁбí,ÿ¸ö´íÎóÖ®¼äÓÃ\n·Ö¿ª.
        %>
        <script language="javascript" >
        <!--//
            alert("<%=strJSMessage %>");        'µ¯³öÌáʾ´íÎó¿ò.
  


Ïà¹ØÎĵµ£º

ʵÏÖasp³ÌÐòµ÷ÓÃÉãÏñÍ·²¢¿ØÖÆÉãÏñÍ·½øÐÐÅÄÕÕ

Õ⼸ÌìºÃ¶àÈËÎÊÎÒÈçºÎÔÚasp³ÌÐòÖпØÖÆÉãÏñÍ·È¥×¥ÅÄÕÕÆ¬£¬asp¼¼Êõ»¹ÊÇ99ÄêµÄʱºò¿´¹ýÒ»µãµã£¬Ôç¾Í×ÅÃ×·¹³ÔÁË£¬²»¹ý¼ÈÈ»ÓÐÈËÎÊ£¬ÄǾÍÊÇ¿´µÃÆðÔÛ£¬»¨ÁËÒ»¸öÍíÉϵÄʱ¼ä°Ñasp³ÌÐòµ÷ÓÃÉãÏñÍ·ÅÄÕÕµÄÎÊÌâ¸ã¶¨ÁË£¬ÏּǼÈçÏ£¬ÈÃÓÐÀàËÆÐèÇóµÄͬѧ¿ÉÒÔÉÙ×ßЩÍä·¡£
Óõ½µÄ¼¼Êõ£º
1.asp³ÌÐòÖÐ×÷base64±àÂëºÍ½âÂ룬ʹÓõÄÊÇmsxml×é¼þ£ ......

ÈçºÎÅäÖÃASPÔËÐл·¾³

1.Èç¹ûÄúµÄ²Ù×÷ϵͳΪWindows 98£¬ÇëÔËÐÐ Windows98µÄ°²×°¹âÅÌ¡£ÔÚÆäAdd-ons\pwsĿ¼ÏÂÕÒµ½pwsµÄ°²×°³ÌÐò£¬ÔËÐа²×°¼´¿É
2.Èç¹û²Ù×÷ϵͳΪ Windows 2000 ÒÔÉÏ£¬¿ÉÒÔ°´Í¼4.1.1µÄ·½·¨°²×° IIS£º
´ò¿ª¡¾¿ØÖÆÃæ°å¡¿£¬ÕÒµ½ ¡¾Ìí¼Ó/ɾ³ý³ÌÐò¡¿→¡¾Ìí¼Ó/ɾ³ýWINDOWS×é¼þ¡¿£¬
µ¯³ö ¡¾Windows ×é¼þÏòµ¼¡¿ £¬Ñ¡Ôñ ¡¾Internet ......

aspÁ¬½ÓaccessÊý¾ÝÀý×Ó

<%Dim connstrconnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Stu.mdb")
Set bb = Server.CreateObject("ADODB.Connection")
bb.Open connstr%>
<html>
<head>
<meta http-equiv="content-Language" content="zh-cn" />
<meta http-equiv="Content-Type ......

ASPϵÁк¯Êý´óÈ« ÍøÉÏÊÕ¼¯µÄһЩASPº¯Êý¼°±í´ïʽ

ASPϵÁк¯Êý´óÈ«-ÍøÉÏÊÕ¼¯µÄһЩASPº¯Êý¼°±í´ïʽ
ASPº¯Êý
´óÈ«¡¡
ASPº¯ÊýÓëVBSCRIPTÀàËÆ£¬ÒÔϾÙһЩ³£Óõĺ¯Êý¡¡
¡¡
Array()¡¡
¡¡
º¯Êý·µ»ØÒ»¸öÊý×é¡¡

¡¡
±í´ïʽ Array(list)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: ×Ö·û£¬Êý×Ö¾ù¿É¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
Dim
myArray()¡¡
¡¡
For i = 1 to 7¡¡
¡¡
Redim Preser ......

asp¶ÁÈ¡word ÎĵµÄÚÈÝת»»Îª¶þ½øÖÆÊý¾ÝÁ÷

Dim FilePath,FileName
Set ObjFileStream = Server.CreateObject("ADODB.Stream")
ObjFileStream.Type = 1
ObjFileStream.Mode = 3
ObjFileStream.open
ObjFileStream.LoadfromFile FilePath&"\"&FileName&".doc"
ObjFileStream.Position = 0
response.binarywrite  ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ