比较难的问题吧，有信心看得懂的高人来看看

ML4455739

嗯，看了脚本不晕再继续。

1. class Get_Http_Info
   
2.   
   
3.   AGENT = "RGSS PLAYER"
   
4.   INTERNET_OPEN_TYPE_PRECONFIG = 0 # IEの設定を仕様
   
5.   INTERNET_OPEN_TYPE_DIRECT    = 1 # プロキシを使用しない
   
6.   def Get_Http_Info.InternetOpen()
   
7.     io = Win32API.new('wininet', 'InternetOpen', %(p, l, p, p, l), 'l')
   
8.     hInternet = io.call(AGENT, INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0)
   
9.     return hInternet
   
10.   end
    
11. 
    
12.   def Get_Http_Info.InternetOpenUrl(hSession, url)
    
13.     iou = Win32API.new('wininet', 'InternetOpenUrl', %(l, p, p, l, l, l), 'l')
    
14.     hService = iou.call(hSession, url, nil, 0, 0, 0)
    
15.     return hService
    
16.   end
    
17. 
    
18.   def Get_Http_Info.InternetReadFile(hService)
    
19.     content = ""
    
20.     read_size = 1024 # 一次读入文件的尺寸
    
21.     irf = Win32API.new('wininet', 'InternetReadFile', %(l, p, i, p), 'i')
    
22.     while(true)
    
23.       buf = "\0" * read_size
    
24.       red = [0].pack('L')
    
25.       irf.call( hService, buf, read_size, red )
    
26.       if(red.unpack('L') == [0])
    
27.         #读到文件末端
    
28.         break
    
29.       end
    
30.       buf.delete!("\0")
    
31.       content += buf
    
32.     end
    
33. 
    
34.     return content
    
35.   end
    
36. 
    
37.   HTTP_QUERY_STATUS_CODE = 19
    
38.   
    
39.   def Get_Http_Info.HttpQueryInfo(hService)
    
40.     read_size = 1024
    
41.     buf = "\0" * read_size
    
42.     red = [read_size-1].pack('L')
    
43.     hqi = Win32API.new('wininet', 'HttpQueryInfo', %(l, l, p, p, p), 'i')
    
44.     isOk = hqi.call( hService, HTTP_QUERY_STATUS_CODE, buf, red, nil)
    
45.     buf.delete!("\0")
    
46.     return buf
    
47.   end
    
48. 
    
49.   def Get_Http_Info.InternetCloseHandle(hInternet)
    
50.     ich = Win32API.new('winInet', 'InternetCloseHandle', %(l), 'i')
    
51.     isOk = ich.call(hInternet)
    
52.     return isOk
    
53.   end
    
54. 
    
55.   HTTP_CODE_OK = "200"
    
56.    
    
57.   def Get_Http_Info.get_info(url)
    
58.     info = nil
    
59.     begin
    
60.       hInternet = InternetOpen()
    
61.       if(hInternet != 0)
    
62.         hService = InternetOpenUrl(hInternet, url)
    
63.         if(hService != 0)
    
64.           status_code = HttpQueryInfo(hService)
    
65.           if(status_code == HTTP_CODE_OK)
    
66.             info = InternetReadFile(hService)
    
67.           end
    
68.           InternetCloseHandle(hService)
    
69.         end
    
70.         InternetCloseHandle(hInternet)
    
71.       end
    
72.     rescue
    
73.       # 例外发生
    
74.       return nil
    
75.     end
    
76. end

复制代码

不知道以前在哪找到的这个，打开网络文件，现在很想用，请问应该怎样

IamI

功能和函数写的这么清楚……已经没必要说明了。
这样的接口还找不到用法的话，大概是没有必要用的了。

ML4455739

1. url =
   
2. ""
   
3. ver = Get_Http_Info.get_info(url)

复制代码

呃，我只知道这个

后知后觉

参考《6R之眼》