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

MVCÈý²ã¼Ü¹¹ÔÚASPÖеÄÓ¦ÓÃ


ǰ¶Îʱ¼ä¶ÁÁ˲»ÉÙ¹ØÓÚMVCµÄÎÄÕ£¬ÊÔ×ÅÔÚASPÖÐÓ¦ÓÃÁËһϣ¬·¢ÏÖ¶ÔÓÚС³ÌÐò£¬´úÂëÁ¿»á´ó·ù¶ÈÔö¼Ó£¬µ«ÊÇÂß¼­ÇåÎú£¬Êý¾Ý·â×°ºÜºÏÀí£¬ÒÔǰÐèÒª×Ðϸ¹æ»®µÄ´úÂ븴Óþ¹È»³ÉÁËÀíËùµ±È»µÄÊÂÇé¡£
ËùνMVC£¬¼´Model£¨Ä£ÐÍ£©£¬View£¨ÊÓͼ£©£¬Control£¨¿ØÖÆ£©Èý²ã¼Ü¹¹¡£¸÷²¿·Ö¸÷˾ÆäÖ°£¬Model¼´µ×²ã¹¹¼Ü£¬°üº¬ÓëÊý¾Ý¿âÁ¬½ÓµÄ²¿·Ö£¬View¼´UIչʾ²¿·Ö£¬ÓëÓû§Ö±½Ó´ò½»µÀ£¬Control¼´¿ØÖƲ㣬¸ºÔð½ÓÊÕViewµÄÇëÇó²¢×öÊʵ±Ô¤´¦Àíºó½»ÓÉModel´¦Àí£¬È»ºó½ÓÊÕModel·µ»ØÖµ²¢×ö¸ñʽ»¯´¦Àí·µ»ØView²ã¡£¼òµ¥µØËµ£¬ModelÖ±½ÓÓëϵͳµ×²ãÈçÊý¾Ý¿âµÈ´ò½»µÀ£¬¶ø²»¹ÜÊý¾Ý³öÈ¥ºóÈçºÎÓã¬ViewÖ»¸ºÔðÇëÇóºÍչʾÊý¾Ý£¬¶ø²»¹ÜÏêϸÁ÷³Ì£¬Control·Ö±ðÓëViewºÍModel´ò½»µÀ£¬²¢¸ºÔðÊý¾ÝµÄÑéÖ¤¡¢¸ñʽ»¯µÈ¹¤×÷¡£
дÁËÒ»¸ö»ñÈ¡Óû§×ÊÁϵÄASPÖÐÓ¦Óãº
ÏÈдModel²ã£¬¶¨ÒåÊý¾Ý¿âµØÖ·£¬´ò¿ªÁ¬½ÓÊý¾Ý¿â£¬»ñÈ¡¼Ç¼¡£
ÔÚдModel²ã֮ǰ¶¨ÒåÁËÁ½¸öÀࣺCls_ConfigÕûÕ¾ÉèÖ㬰üÀ¨Êý¾Ý¿âµØÖ·£»Cls_DatabaseModel£¬¸ºÔð´ò¿ª¹Ø±ÕÊý¾Ý¿âÁ¬½Ó¡£
Cls_ConfigModel.asp´úÂëÈçÏ£º
<%
Class Cls_ConfigModel
    Private i_datapath,i_sitename,i_sitedomain,i_mastermail
    Private Sub Class_Initialize()
        i_datapath="mytdata\mytdata2.mdb"
        i_sitename="ÖйúµØÖÊ´óѧ£¨Î人£©Ãñ×åÀÖÍŹٷ½ÍøÕ¾"
        i_sitedomain="www.cugmyt.cn"
        i_mastermail="master@cugmyt.cn"
    End Sub
    Public property get DataPath
        DataPath=server.MapPath(i_datapath)
    End property
    Public property get SiteName
        SiteName=i_sitename
    End property
    Public property get SiteDomain
        SiteDomain=i_sitedomain
    End property
    Public property get MasterMail
        MasterMail=i_mastermail
    End property
End Class
%>
Cls_DatabaseModel.asp´úÂëÈçÏ£º
<!--#include file="cls_configmodel.asp" -->
<!


Ïà¹ØÎĵµ£º

64λ»úÆ÷Ö§³ÖASPÔËÐÐ,ÒªÉèÖòÎÊý

Ö÷Ŀ¼,ÅäÖÃϱðÍüÁËÆôÓø¸Ä¿Â¼
ÎÊÌâÖ¢×´£º
ADODB.Connection ´íÎó '800a0ea9' δָ¶¨Ìṩ³ÌÐò£¬Ò²Ã»ÓÐÖ¸ÅɵÄĬÈÏÌṩ³ÌÐò¡£
ÎÊÌâ·ÖÎö£º
Windows 64λµÄϵͳÉÏ£¬ÔËÐÐÏÂÁÐ32bit(λ)Ó¦ÓóÌÐò£¬²»Äܹ»ÍêÈ«¼æÈÝ£¬ÐèÒª¶ÀÁ¢²Ù×÷½â¾ö¡£³ÌÐòÁбíÈçÏ£º
Internet·þÎñAPIÀ©Õ¹
ISAPI¹ýÂËÆ÷
ASPÓ¦ÓóÌÐò
ASP.NETÓ¦ÓóÌÐò
½ ......

aspÏÂÔØÆäËüÍøÕ¾µÄͼƬÀ´¸øhtmlÏÔʾ

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
Option Explicit
Response.Buffer = True '»º´æÍ¼Æ¬
Dim objXMLHTTP, XML
Set XML = Server.CreateObject("Microsoft.XMLHTTP") '½¨Á¢ÏÂÔØ¶ÔÏó
XML.Open "GET","http://www.google.cn/images/nav_logo7.png",False '¿ªÊ¼»ñȡͼƬ,http://xxx/pngÕâ½Ú¿ÉÒԸijÉ× ......

ASP.NETÖ®Îå ASP.NET¶ÔÏó

session
===================================
session¶ÔÏóÓÃÓÚ´æ´¢ÌØ¶¨µÄÓû§»á»°ËùÐèµÄÐÅÏ¢ ¡£ Session¶ÔÏóµÄÒýÈëÊÇΪÁËÃÖ²¹HTTPЭÒéµÄ²»×㣬HTTPЭÒéÊÇÒ»ÖÖÎÞ״̬µÄЭÒé¡£
¡¡¡¡SessionÖÐÎÄÊÇ“»á»°”µÄÒâ˼£¬ÔÚASPÖдú±íÁË·þÎñÆ÷Óë¿Í»§¶ËÖ®¼äµÄ“»á»°”¡£SessionµÄ×÷ÓÃʱ¼ä´ÓÓû§µ½´ïij¸öÌØ¶¨µÄ ......

Asp´´½¨Êý¾Ý¿âÎļþ

Sub CreateAccessDB(DBToCreate)
    Dim catNewDB ' As ADOX.Catalog
    Set catNewDB = Server.CreateObject("ADOX.Catalog")
    catNewDB.Create "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=" & se ......

ASPÌõ¼þÓï¾äÖ®IFÓï¾ä

±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/827.html
Ìõ¼þÓï¾äÖ® if ... then ... else Óï¾ä
ÓÃÀ´ÅжÏÌõ¼þÊÇ true »ò false £¬²¢¸ù¾ÝÅжϽá¹ûÀ´Ö´ÐÐÖ¸¶¨µÄÓï¾ä£¬Í¨³£Ìõ¼þÊÇÓñȽÏÔËËã·û¶ÔÖµ»ò±äÁ¿½øÐбȽÏÀ´±í´ï¡£
if ... then ... else ¿ÉÒÔ¸ù¾ÝÐèÒª½øÐÐǶÌ×ʹÓ㬿ÉÒÔд³É elseif ¡£
ʾÀý£º
ÒÔÏÂÎ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ