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

ÈçºÎÓÃVBµÇ¼ÍøÕ¾?Çë´úÂë¾ÙÀý - VB / »ù´¡Àà

ÈçºÎÓÃVBµÇ¼ÍøÕ¾?Çë´úÂë¾ÙÀý

ÍøÒ³ÉÏÓÐÓû§Ãû,¿ÚÁîºÍÑéÖ¤Âë,µ±È»ÑéÖ¤ÂëÓÃÊÖ¹¤Êä
ʹÓÃwebbrowser¿Ø¼þ¡£

ͨ¹ý webbrowser.document.body.form("formid").valueÀ´¸³Öµ¡£

ÍêÁË,ÎÊÌâûÎÊÃ÷°×,
ÎÒÒªÓÃWinsock
²»ÓñðµÄ

¼ÌÐøµÈ´ý¸ßÊÖ

¼ÌÐøµÈ´ý¸ßÊÖ

¼ÌÐøµÈ´ý¸ßÊÖ

ϸö·â°üÈí¼þ,Õý³£µÇ½µÄʱºò¿´¿´·¢Ë͵ÄÊÇʲô
È»ºóÄã×Ô¼º´´½¨Ò»¸ö,·¢Ë͹ýÈ¥¾ÍOKÁË
Èç
  Dim Str As String
  
   
  Dim strPage As String, strHost As String, strRefer As String
  Dim lenth As Integer
  strHost = "localhost:8080"
  strPage = "/web/test.asp"
  strRefer = "http://localhost:8080/web/test.asp"
  length = Len("name=123&pwd=456")
   
   
  Str = "POST " & strPage & " HTTP/1.1" & vbCrLf
  Str = Str & "Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*" & vbCrLf
  Str = Str & "Referer: " & strRefer & vbCrLf
  Str = Str & "Accept -Language: zh -cn" & vbCrLf
  Str = Str & "Content-Type: application/x-www-form-urlencoded" & vbCrLf
  Str = Str


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

vb - VB / »ù´¡Àà

ÎÒÏë°ÑwordÁí´æΪxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......

vb¶ÁÈ¡ÓÃwordת»»³ÉµÄxmlÀïµÄÊý¾Ý - VB / »ù´¡Àà

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......

VB µ÷ÓÃInet¿Ø¼þÏÂÔسö´í - VB / ÍøÂç±à³Ì

¸÷λ¸ßÊÖ£¬Ð¡µÜ×î½üÅöµ½Ò»¸öÎÊÌ⣺ԭÏÈдµÄ³ÌÐò´ó¸ÅµÄ˼·ÊÇ£ºÊ×ÏÈwebbrowser´ò¿ªÍøÖ·£¬ÍøÖ·ÏÔʾºó£¬µã»÷ÍøÖ·ÉϵÄijһ¸öÁ¬½Ó£¬µ±webbrowser¼ì²âµ½ÍøÖ·ÒѾ­Á¬½Óµ½ÏëÒªµÄµØַʱºò¾Í¿ªÊ¼ÏÂÔØÎļþ£¬µ±ÓÃIE6µÄʱºòÏÂÔ ......

ÇóÖú£ºC´úÂëchange toVB´úÂë - VB / »ù´¡Àà

ͦ·±Ëö£¬Ö®Ç°·¢µÄÌû×Ó£¬·Öֵ̫µÍÏÖÔÚÖØ·¢Ò»¸ö¡£»¶Ó­¸÷λ´óÏÀ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[] ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ