vbÓÃinet1 post Ìá½»Êý¾Ý - VB / ÍøÂç±à³Ì
¼ÙÉèÍøÕ¾ÓÐA B ¶þ¸öÒ³Ãæ£¡
ÓÃvbÓÃinet1 post ÔÚ AÒ³ÃæµÇ¼ϵͳ È»ºóÔÚµ½BÒ³Ãæ·¢ÐÅÏ¢£¡
Ìáʾ·Ç·¨µÇ¼ Òâ˼¾ÍÊÇ session µÄÐÅÏ¢¶ªÁË£¡
ÄÇλ¸ßÊÖÖªµÀÔõô½â¾ö?
°Ñsessionkey´«¹ýÈ¥£¬¶à°ëÊÇ·ÅÔÚcookieÀïÃæ¡£´Óhttp responseÀïÃæÕÒset-cookie×ֶΡ£
send_data = "YYH=" & geturlcode(web_username) & "&YMM=" & geturlcode(web_password) & "&YZ=" & getcode(url & "/getcode.php") & "&login.x=19&login.y=9"
form1.Inet1.Execute url & "/login.php", "POST", send_data, "Content-Type: application/x-www-form-urlencoded"
ÎÒ²»ÖªµÀÔõô´«£¡ÉÏÃæÊǵǼʱºòµÄ´úÂë
ÎÒÒ²ÌýÒ»¸öÅóÓÑ˵°É COOKIEÒ²´«¹ýÈ¥£¡
µ«ÊÇÎÒ²»ÖªµÀ´úÂëÔõôд£¡
COOKIE Õâ¸öÎÒ¿ÉÒÔ×¥°üµÃµ½£¡
µ«ÊÇÎÒ²»ÖªµÀ´úÂëÔõôд£¡ÎÒµÄÄǸöÅóÓÑÓõÄÊÇC# ºÍÎÒ²»Ò»Ñù£¡
¸Ðл Äܲ»ÄܸøÒ»¸ö´úÂ룡
http://www.hafdc.com ¿ÉÒÔÓÃÎÒÕâ¸öÍøÕ¾×öʾ·¶£¡
³É¹¦ÁË£¡ ¸øÄã100·Ö£¡ ÒòΪÎÒ¾Í100·Ö£¡
ÎÒÊǽËÕ»´°²µÄ Èç¹û½üµÄ»° ¿ÉÒÔµ±ÃæÇë³Ô·¹£¡ºÇºÇ
лл ÎÒÀí½âÄãµÄÒâ˼£¡ ¶øÇÒÎÒÔÚץȡµÄ°üÀïÃæÒ²ÄÜÕÒµ½cookieµÄÖµ£¡
µ«ÊÇÎÒ²»ÖªµÀÔõôÓÃVB ÔÚ·¢ÐÅÏ¢µÄʱºò °ÑÕâ¸öÒ²´øÉÏ£¡
Äܲ»Äܸøµã´úÂë¿´¿´£¡Î±´úÂëÒ²ÐУ¡
ÕâÑù°É ¸çÃÇ £¡
ÄãÁô¸öµç»° »òÕßQQ£¡
ÎÒÁªÏµÄ㣡 Õâ¸öÎÊÌâÒѾÀ§ÈÅÎҺܳ¤Ê±¼äÁË£¡
ÎÒºÜÏë½â¾ö£¡
ExecuteµÚ4¸ö²ÎÊýÓ¦¸Ã¿ÉÒÔÉèÖÃCookies
ExecuteµÚ4¸ö²ÎÊý²»Ó¦¸ÃÊÇ Cookies
form1.Inet1.Execute Trim(Text2.Text), "POST", Trim(Text1.Text)
Ïà¹ØÎÊ´ð£º
Ϊʲô¹¤¾ßÀ¸°´Å¤µÄ¿í¶È¸Ä±ä²»ÁË,ÔÚÊôÐÔÀï¸ÄÁËÓÖ±ä³ÉÔÀ´µÄÊýÖµÁË
´óºú×ÓÕæÀ÷º¦£¬»Ø´ð»ù±¾¶¼ÊDZ¬Áϼ¶µÄ
´óºú×ÓÉý¼¶Õæ¿ì°¡£¬Õâ²Å¼¸Ìì¾Í5Ìõ¶Ì¿ãÍâ¼ÓÔÂÅÅÃûµÚÒ»ÁË
ÏëÏëÎÒÕâ5¸ö¶Ì¿ã»ìÁ˲¶à8Äê²ÅµÃµ½µÄ¡£
»Ø¸´ ......
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......