如題,希望高手們可以幫我!用到4個函式,代碼如下:
long ll_session,ll_connect,ll_request
string lsnull
string ls_url,ls_server
string ls_msg = fill(" ",4 * 1024 * 10)
long ll_index,ll_msg_len,ls_error
boolean lb_temp
setnull(lsnull)
ll_msg_len = len(ls_msg)
ll_session = InternetOpenA(lsnull,0,lsnull,lsnull,0)
ls_server = "www.applevb.com"
ll_connect = InternetConnectA(ll_session,ls_server,80,lsnull,lsnull,3,0,0)
ls_url = "/sourcecode/nt_service.zip"
ll_request = HttpOpenRequestA(ll_connect,"GET",ls_url,"HTTP/1.1",lsnull,"*/*",0,0)
lb_temp = HttpQueryInfoA(ll_request,5,ls_msg,ll_msg_len,ll_index)
ls_error = GetLastError()
messagebox('',ls_error)
每次報出來的錯都是12150,說找不到檔案頭資訊?可是這個檔案的地址放到迅雷里面,是可以抓取到檔案頭資訊的啊?
腦麻。。。是不是代碼有問題?參與有分拿哦~
uj5u.com熱心網友回復:
補充一下,網上說的一些方法都不行,比如InternetConnectA的第二個引數不能帶http://協議頭,照做,依舊不行。。。函式宣告如下://1.
function long InternetOpenA(string sAgent,long lAccess,string sProxyName,string sProxyBypass,long lFlags) library "wininet.dll"
//2.
function long InternetConnectA(long hInternetSession,string lpszServerName ,long nProxyPort,string lpszUsername ,string lpszPassword ,long dwService ,long dwFlags ,long dwContext ) library "wininet.dll"
//3.
function long HttpOpenRequestA(long hConnect,string lpszVerb,string lpszObjectName,string lpszVersion,string lpszReferrer,string lplpszAcceptTypes,long dwFlags,long dwContext) library "wininet.dll"
//4.
function boolean HttpQueryInfoA(long hRequest,long dwInfoLevel,ref string lpvBuffer,ref long lpdwBufferLength,ref long lpdwIndex) library "wininet.dll"
//
Function Long GetLastError() library "kernel32.dll"
uj5u.com熱心網友回復:
up~up~uj5u.com熱心網友回復:
mark如果你用pb10以上,在定義外部函式要加 alias for 'InternetOpenA;ansi'
uj5u.com熱心網友回復:
頂貼!!!uj5u.com熱心網友回復:
uj5u.com熱心網友回復:
暈死。。。有沒有曉得的啊?我頂~~~~~~~~~~~~~~~~~~~~~····永生給看看啊,呵呵~uj5u.com熱心網友回復:
其實大家可以試試嘛,說不定就是那塊有問題哦,我再試試去……uj5u.com熱心網友回復:
今天還是沒有人嗎?無語了。。。。。。。。。。uj5u.com熱心網友回復:
用InternetOpenUrl轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/85311.html
標籤:API 調用
上一篇:PowerDesign 設計資料庫 洗掉表問題 急!
下一篇:請教:樹形控制元件和選單事件
