ASPÓëActiveX¿Ø¼þ½»»¥ÊµÕ½(Ò»)
ASPÓëActiveX¿Ø¼þ½»»¥ÊµÕ½(Ò»)
¹Ø¼ü×Ö:ASP,ActiveX¿Ø¼þ,Êý×ÖÇ©Ãû,°²È«
ActiveX¿Ø¼þÔËÐÐÔÚ¿Í»§¶Ë¡£ÎÒÃÇ¿ÉÒÔ»ñµÃ¿Í»§¶ËµÄһЩÐÅÏ¢£¬ÈçIC¿¨µÄÐÅÏ¢,¿Í»§¶ËµÄÑéÖ¤µÈµÈ¡£µ«ÊÇActiveX¿Ø¼þÒ²ÓÐÐí¶àȱµã£º¿Í»§¶ËµÄ²¿ÊðºÜÀ§ÄÑ£¬Èç¿Í»§¶Ë²»ÄÜÕýÈ·ÏÂÔØ£¬ÏÂÔØÁËÒÔºó²»ÄÜÕýÈ·Ö´ÐУ¬ÏÂÔصÄʱºòÐèÒªÉèÖÃIEµÄ°²È«¼¶±ðµÈµÈ¡£
¸ü¶àµÄʱºò£¬ÎÒ¶¼ÔÚʹÓÃCOM×é¼þÀ´À©Õ¹ASPµÄ¹¦ÄÜ¡£×¼È·µØ˵£¬ÊÇ·þÎñ¶ËÔËÐеÄActivex Dll×é¼þ¡£Ê¹ÓÃServer.CreateObject(“¹¤³ÌÃû.ÀàÃû”)¼´¿ÉÍê³É¶Ô×é¼þµÄµ÷Óá£ÕâÖÖ·½Ê½ÎÊÌâºÜÉÙ,Ö»Òª×é¼þÖÐÒÔPUBLIC¶ÔÍⱩ¶·½·¨¼È¿É¡£µ«ÊÇ£¬ÓÐʱºòÎÒÃDZØÐëʹÓÃACTIVEX ¿Ø¼þ(*.OCX)ǶÈëµ½ÍøÒ³ÖÐÖ´ÐÐÀ´»ñÈ¡¿Í»§¶ËµÄÐÅÏ¢¡£Õâ¾ÍÓÐÁËÐíÐí¶à¶àµÄһЩÎÊÌâ¡£
ÕâÊÇÎÒÃÇÐèÒª½â¾öµÄN¸öÎÊÌâ(´Ó¼òµ¥µ½ÄÑ)
1£® ÈçºÎ´Ó·þÎñ¶Ë»ñÈ¡Êý¾Ý£¬´«µÝµ½ActiveX¿Ø¼þÖС£
1£© ³õʼ»¯Ê±Ê¹ÓòÎÊý°ó¶¨
2£© ÔËÐÐʱµÃµ½Êý¾Ý
2£® ActiveX¿Ø¼þµÃµ½¿Í»§¶ËµÄÐÅÏ¢£¬ÈçºÎ´«µÝµ½·þÎñ¶Ë¡£
3£® °²È«ÐÔ
1£© Êý×ÖÇ©Ãû
2£© ʹÓÃIOBJSAFE½Ó¿Ú
ºÃÁË£¬ÎÒÃÇ¿ªÊ¼ÊµÀýѧϰ¡£
Õâ¸ö¹¦ÄÜÑÝʾÁËÈçºÎÖÆ×÷Ò»¸ö¼òµ¥µÄ¿Ø¼þ,²¢Ç¶ÈëÍøÒ³ÖÐÖ´ÐС£
¹¤×÷»·¾³:WINXP+VB6+IE6
ÎÒµÄIE°²È«ÉèÖÃΪ°²È«¼¶±ð-ÖС£ËùÓеÄActivexÑ¡ÏîÉèΪÆôÓá£
´ò¿ªvb6,н¨ActiveX¿Ø¼þ¹¤³Ì¡£
¹¤³ÌÃû:fOcx£¬Óû§¿Ø¼þÃû:UC1
ΪÁË·½±ã£¬ÎÒÃÇʹÓÃActiveX¿Ø¼þ½Ó¿ÚÏòµ¼…,²Ëµ¥->Íâ½Ó³ÌÐò->Íâ½Ó³ÌÐò¹ÜÀíÆ÷->VB 6 ActiveX¿Ø¼þ½Ó¿ÚÏòµ¼¡£È·¶¨¼´¿É¡£
Ïà¹ØÎĵµ£º
----INDEX----
1. soapÇëÇó·½Ê½
2. postÇëÇó·½Ê½
3. SHOWALLNODEº¯Êý(¹ØÓÚ½Úµã¸÷ÊôÐÔºÍÊý¾ÝÏÔʾ)
---------------------
Ò»£®SOAPÇëÇóʾÀý
ÏÂÃæÊÇÒ»¸ö SOAP ÇëÇóʾÀý¡£ËùÏÔʾµÄռλ·ûÐèÒªÓÉʵ¼ÊÖµÌæ»»¡£
POST /WebService1/UserSignOn.asmx HTTP/1.1
Host: 192.100.100.81
Content-Type: text/xml; chars ......
1. ʹÓÃVisual Studio 2008,ÏÂÔØASP.NET MVC Framework
2. ĬÈϵÄASP.NET MVC Project°üÀ¨6¸öĿ¼
Controls – ·ÅÖÃController À࣬´¦ÀíURL ÇëÇó¡£
Models – ·ÅÖÃÒµÎñʵÌåÀ࣬±íʾºÍ²Ù×÷Êý¾Ý¡£
Views – ·ÅÖÃUI Ä£°åÎļþ£¬¸ºÔðչʾÊä³ö½á¹û¡£
£¨MVCÖ÷ÒªµÄĿ¼£©
Scripts – ·ÅÖÃJavascript Àà¿â ......
ÔÚASPÖÐΪÎÒÃÇÌṩÁËרÃŵÄÈÕÆÚ¼Ó¼õº¯Êý¡£
¡¡¡¡1.ÈÕÆÚÏà¼Ó
¡¡¡¡DateAdd º¯Êý
¡¡¡¡·µ»ØÒÑÌí¼ÓÖ¸¶¨Ê±¼ä¼ä¸ôµÄÈÕÆÚ¡£
¡¡¡¡DateAdd(interval, number, date)
¡¡¡¡DateAdd º¯ÊýµÄÓï·¨ÓÐÒÔϲÎÊý
¡¡¡¡£¨1£©interval ±ØÑ¡Ïî¡£×Ö·û´®±í´ïʽ£¬±íʾҪÌí¼ÓµÄʱ¼ä¼ä¸ô¡£ÓйØÊýÖµ£¬Çë²ÎÔÄ“ÉèÖ ......
<%
Private Const BITS_TO_A_BYTE = 8
Private Const BYTES_TO_A_WORD = 4
Private Const BITS_TO_A_WORD = 32
Private m_lOnBits(30)
Private m_l2Power(30)
Private Function LShift(lValue, iShiftBits)
If iShiftBits = 0 Then
LShift = lValue
Exit Function
ElseIf iShiftBi ......
<%
function decrypt(dcode)
dim texts
dim i
for i=1 to len(dcode)
texts=texts & chr(asc(mid(dcode,i,2))-i)
next
decrypt=texts
end function
function encrypt(ecode)
dim texts
dim i
for i=1 to len(ecode)
texts=texts & chr(asc(mid(ecode,i,2))+i)
next
en ......