VB.NET/ASP.NET±àÂë¹æ·¶
ÔÚ¿ª·¢Öб£³ÖÁ¼ºÃµÄ±àÂë¹æ·¶ÊÇÊ®·ÖÖØÒªµÄ¡£ÎÒËù²ÉÓõÄеÄVB.net/ASP.NET±àÂë¹æ·¶£¬ÊÇÒ»ÖÖ±»Ö¤Ã÷ÄÜÃ÷ÏÔ¸ÄÉÆ´úÂë¿É¶ÁÐÔ£¬²¢ÓÐÖúÓÚ´úÂë¹ÜÀí¡¢·ÖÀàµÄ±àÂë¹æ·¶¡£²ÉÓÃÕâÖÖ±àÂë¹æ·¶£¬ÄܱÜÃâÈçÐÙÑÀÀûÃüÃû·¨´øÀ´µÄ·±³¤Ç°×º£¬±ãÓÚ¼ÇÒä±äÁ¿µÄÓÃ;¡£ÏÂÃæµÄ½éÉÜÕâÖÖ±àÂë¹æ·¶¡£
Ò»¡¢ÀàÐͼ¶µ¥Î»µÄÃüÃû
1¡¢Àà
¡õÒÔClassÉùÃ÷µÄÀ࣬¶¼±ØÐëÒÔÃû´Ê»òÃû´Ê¶ÌÓïÃüÃû£¬ÌåÏÖÀàµÄ×÷Óá£È磺
Class Indicator
¡õµ±ÀàÊÇÒ»¸öÌØÐÔ£¨Attribute£©Ê±£¬ÒÔAttribute½á⣬µ±ÀàÊÇÒ»¸öÒì³££¨Exception£©Ê±£¬ÒÔException½áβ£º
Class ColorSetException
Class CauseExceptionAttribute
¡õµ±ÀàÖ»ÐèÓÐÒ»¸ö¶ÔÏóʵÀý£¨È«¾Ö¶ÔÏ󣬱ÈÈçApplicationµÈ£©£¬±ØÐëÒÔClass½á⣬Èç
Class ScreenClass
Class SystemClass
¡õµ±ÀàÖ»ÓÃÓÚ×÷ΪÆäËûÀàµÄ»ùÀ࣬¸ù¾ÝÇé¿ö£¬ÒÔBase½áβ£º
MustInherit Class IndicatorBase
¡õÈç¹û¶¨ÒåµÄÀàÊÇÒ»¸ö´°Ì壬ÄÇôÃû×ֵĺóÃæ±ØÐë¼Óºó׺Form£¬Èç¹ûÊÇWeb´°Ì壬±ØÐë¼Óºó׺Page£º
Class PrintForm : Inherits Form ''''* Windows´°Ìå
Class StartPage : Inherits Page ''''* Web´°Ìå
2¡¢Ã¶¾ÙºÍ½á¹¹
ͬÑù±ØÐëÒÔÃû´Ê»òÃû´Ê¶ÌÓïÃüÃû¡£×îºÃÌåÏÖö¾Ù»ò½á¹¹µÄÌØµã£¬È磺
Enum ColorButtons ''''ÒÔ¸´Êý½á⣬±íÃ÷ÕâÊÇÒ»¸öö¾Ù
Structure CustomerInfoRecord ''''ÒÔRecord½á⣬±íÃ÷ÕâÊÇÒ»¸ö½á¹¹Ìå
3¡¢Î¯ÅÉÀàÐÍ
¡õÆÕͨµÄίÅÉÀàÐÍÒÔÃèÊö¶¯×÷µÄÃû´ÊÃüÃû£¬ÒÔÌåÏÖίÅÉÀàÐÍʵÀýµÄ¹¦ÄÜ£º
Delegate Sub DataSeeker (ByVal SeekString As String)
¡õÓÃÓÚʼþ´¦ÀíµÄίÅÉÀàÐÍ£¬±ØÐëÒÔEventHandler½á⣬È磺
Delegate Sub DataChangedEventHandler (ByVal Sender As Object, ByVal e As DataChangedEventArgs)
4¡¢½Ó¿Ú
ÓëÆäËûÀàÐͲ»Í¬£¬½Ó¿Ú±ØÐëÒªÓÉI×÷Ϊǰ׺£¬²¢ÓÃÐÎÈÝ´ÊÃüÃû£¬Í»³ö±íÏÖʵÏÖ½Ó¿ÚµÄÀཫ¾ßÓÐʲôÄÜÁ¦£º
Interface ISortable
5¡¢Ä£¿é
Ä£¿é²»ÊÇÀàÐÍ£¬ËûµÄÃû³Æ³ýÁ˱ØÐëÒÔÃû´ÊÃüÃûÍ⣬±ØÐë¼ÓÒÔºó׺Module:
Module SharedFunctionsModule
ÉÏÊöËùÓйæÔòµÄ¹²Í¬ÌصãÊÇ£¬Ã¿¸ö×é³ÉÃû³ÆµÄ´ÊÓï¶¼±ØÐëÊÇ´óд¿ªÍ·£¬½ûÖ¹ÍêÈ«´óд»òСдµÄÃû³Æ¡£
¶þ¡¢·½·¨ºÍÊôÐÔµÄÃüÃû
1¡¢·½·¨
ÎÞÂÛÊǺ¯Êý»¹ÊÇ×Ó³ÌÐò£¬·½·¨¶¼±ØÐëÒÔ¶¯´Ê»ò¶¯´Ê¶ÌÓïÃüÃû¡£ÎÞÐèÇø·Öº¯ÊýºÍ×Ó³ÌÐò£¬Ò²ÎÞÐèÖ¸Ã÷·µ»ØÀàÐÍ¡£
Sub Open(ByVal CommandString As String)
Function SetCopyNumber(ByVal CopyNumber As Integer)
²ÎÊýÐèÒªÖ¸Ã÷ByVal»¹ÊÇByRef£¬ÕâÒ»µãдÆðÀ´»áÈóÌÐò±ß³¤£¬µ«·Ç³£±ØÒª¡£Èç¹ûûÓÐ
Ïà¹ØÎĵµ£º
ÎÒÏë×öÒ»¸ö¶àÖ¸±ê¶¯Ì¬²éѯ£¬ÇëÎÊÄÄλÐÖµÜ×ö¹ý£¬°ï¸ö棡¾ßÌåÒªÇóÊÇ:ÎÒ¿ÉÒÔËæÒâÑ¡ÔñÊý¾Ý¿â±íÖеÄÈκÎÒ»¸ö»ò¶à¸ö×ֶΣ¬È»ºó°ÑËûÃDzéѯ³öÀ´£¡ÎÒ»á×öµ¥Ö¸±í²éѯµÄ£¬µ«ÏÖÔÚ¹¦ÄÜÒªÒªÇó¶àÖ¸±ê¶¯Ì¬²éѯ£¡»áµÄ°ï¸öæ°¡@£¡¸Ðл֮ÖÁ£¡
ÀýÈçÎÒÏë²éÊý¾Ý¿â±íÖÐµÄ Óû§±àºÅ ÐÕÃû »òÕßÓû§±àºÅ ÐÕÃû Ê¡·Ý ÊÕÈë ²¢°Ñ¶ÔÓ¦µ ......
Ìí¼Ó2¸ötext£¬Ò»¸öcommand£¬Ò»¸ö WebBrowser
Dim vDoc, vTag
Dim i As Integer
Private Sub Command1_Click()
Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1
If UCase(vDoc.All(i).tagName) = "INPUT" Then
Set vTag = vDoc.All(i)
If vTag.Type = "text" Then
Select Case vTag.Nam ......
Cookie (HttpCookieµÄʵÀý)ÌṩÁËÒ»ÖÖÔÚ Web Ó¦ÓóÌÐòÖд洢Óû§Ìض¨ÐÅÏ¢µÄ·½·¨¡£ÀýÈ磬µ±Óû§·ÃÎÊÄúµÄÕ¾µãʱ£¬Äú¿ÉÒÔʹÓÃCookie ´æ´¢Óû§Ê×Ñ¡Ïî»òÆäËûÐÅÏ¢¡£µ±¸ÃÓû§ÔٴηÃÎÊÄúµÄÍøÕ¾Ê±£¬Ó¦ÓóÌÐò±ã¿ÉÒÔ¼ìË÷ÒÔǰ´æ´¢µÄÐÅÏ¢¡£
ASP.NETÖеÄcookie£º´´½¨Cookie·½·¨ (1)
Response.Cookies["userName"].Value = “admin" ......
ASP.NETÊÇÒ»¸ö·Ç³£Ç¿´óµÄ¹¹½¨WebÓ¦ÓÃµÄÆ½Ì¨£¬ËüÌṩÁ˼«´óµÄÁé»îÐÔºÍÄÜÁ¦ÒÔÖÂÓÚ¿ÉÒÔÓÃËüÀ´¹¹½¨ËùÓÐÀàÐ͵ÄWebÓ¦Óá£
¾ø´ó¶àÊýµÄÈËÖ»ÊìϤ¸ß²ãµÄ¿ò¼ÜÈ磺 WebForms ºÍ WebServices --ÕâЩ¶¼ÔÚASP.NET²ã´Î½á¹¹ÔÚ×î¸ß²ã¡£
ÕâÆªÎÄÕµÄ×ÊÁÏÊÕ¼¯ÕûÀí×Ô¸÷ÖÖ΢Èí¹«¿ªµÄÎĵµ£¬Í¨¹ý±È½Ï IIS5¡¢IIS6¡¢IIS7 ÕâÈý´ú IIS ¶ÔÇëÇóµÄ´¦Àí¹ý³ ......