如何用Get_Http_Info读取的数据....

end55rpg · 发表于 2013-8-2 22:39:57

490832999 发表于 2013-8-2 22:36
这东西不会呢...可能要用到gdi32

AbortPath 抛弃选入指定设备场景中的所有路径。也取消目前正在进行的任 ...

…………难道要这等麻烦。。。API

秒杀了我。。。。。
gdi是啥。。。好吧我慢慢翻，。。。。。貌似绘图

490832999 · 发表于 2013-8-2 22:43:10

end55rpg 发表于 2013-8-2 22:39
…………难道要这等麻烦。。。API秒杀了我。。。。。
gdi是啥。。。好吧我慢慢翻，。。。。。貌 ...

Get_Http_Info也肯定是用API了啊

救世小树 · 发表于 2013-8-2 22:44:58

好吧，我也不会。
【其实我也就会点RGSS，这个好像是牵扯到png文件结构什么的吧(不知道是不是)，完全不懂，看来帮不了你

】

end55rpg · 发表于 2013-8-2 22:56:22

亿万星辰发表于 2013-8-2 22:23
试试直接用File.open打开一个文件，然后直接用write把整个数据写入，我曾经写过抓取blog网页中图片和文字的 ...

p=Get_Http_Info.get_html('http://www.baidu.com/img/bdlog)
o.gif'
p p
File.open("bd.gif","w+").write(p)

复制代码

然后p出来的就差不多乱码啦。。然后保存的bd.gif也就是绘图失败。。。

亿万星辰 · 发表于 2013-8-2 23:06:26

本帖最后由亿万星辰于 2013-8-2 23:16 编辑

那说了半天Get_Http_Info.get_html是什么内容啊，你还是不说……

用 wb 来写

bitmap = Get_Version_Info.get_version("http://uc.66rpg.com/data/avatar/000/24/98/90_avatar_middle.jpg")
f = File.open("temp.jpg", "wb")
f.write(bitmap)
f.close

复制代码

end55rpg · 发表于 2013-8-2 23:32:12

亿万星辰发表于 2013-8-2 23:06
那说了半天Get_Http_Info.get_html是什么内容啊，你还是不说……

用 wb 来写

好吧明天我试试然后html..那个就是几百年前你updateonline的产物啊。。睡咯注意休息。。。。
我记得我是用wb不行才改用w+的，，

end55rpg · 发表于 2013-8-3 07:49:43

本帖最后由 end55rpg 于 2013-8-3 07:52 编辑

亿万星辰发表于 2013-8-2 23:06
那说了半天Get_Http_Info.get_html是什么内容啊，你还是不说……

用 wb 来写

bitmap = Get_Version_Info.get_version("http://uc.66rpg.com/data/avatar/000/24/98/90_avatar_middle.jpg")
f = File.open("temp.jpg", "wb")
f.write(bitmap)
f.close

= =我试了下运行这个怎么不管用额，下载的temp.jpg还是无法显示。。。你测试能显示？

gethtml如下↓。。

RUBY 代码复制

#==================================================
# 本脚本来自 [url]www.66rpg.com[/url] 使用和转载请保留此信息
#==================================================
class Get_Http_Info
  AGENT = "RGSS PLAYER"
  INTERNET_OPEN_TYPE_PRECONFIG = 0 # IEの設定を仕様
  INTERNET_OPEN_TYPE_DIRECT = 1 # プロキシを使用しない
 
  def Get_Http_Info.InternetOpen()
    io = Win32API.new('wininet', 'InternetOpen', %(p, l, p, p, l), 'l')
    hInternet = io.call(AGENT, INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0)
    return hInternet
  end
 
  def Get_Http_Info.InternetOpenUrl(hSession, url)
    iou = Win32API.new('wininet', 'InternetOpenUrl', %(l, p, p, l, l, l), 'l')
    hService = iou.call(hSession, url, nil, 0, 0, 0)
    return hService
  end
 
  def Get_Http_Info.InternetReadFile(hService,length,bk)
    content = ""
 
    read_size = 1024 # 一次读入文件的尺寸
    irf = Win32API.new('wininet', 'InternetReadFile', %(l, p, i, p), 'i')
    bk.call(0,length)
    id=0
    while(true)
      buf = "\0" * read_size
      red = [0].pack('L')
      irf.call( hService, buf, read_size, red )
      bk.call(id*read_size,length)
      id+=1
      # 读到文件末端
      break if (red.unpack('L') == [0])
      buf.delete!("\0")
      content += buf
    end
    return content
  end
 
  HTTP_QUERY_STATUS_CODE = 19
  CONTENT_LENGTH=5
  def Get_Http_Info.HttpQueryInfo(hService)
    read_size = 1024
    buf = "\0" * read_size
    red = [read_size-1].pack('L')
    hqi = Win32API.new('wininet', 'HttpQueryInfo', %(l, l, p, p, p), 'i')
    isOk = hqi.call( hService, HTTP_QUERY_STATUS_CODE, buf, red, nil)
    buf.delete!("\0")
    return buf
  end
 
  def Get_Http_Info.InternetCloseHandle(hInternet)
    ich = Win32API.new('winInet', 'InternetCloseHandle', %(l), 'i')
    isOk = ich.call(hInternet)
    return isOk
  end
 
  HTTP_CODE_OK = "200"
  def Get_Http_Info.HttpQuerySize(hService)
    read_size = 1024
    buf = "\0" * read_size
    red = [read_size-1].pack('L')
    hqi = Win32API.new('wininet', 'HttpQueryInfo', %(l, l, p, p, p), 'i')
    isOk = hqi.call( hService, CONTENT_LENGTH, buf, red, nil)
    buf.delete!("\0")
    return buf
  end
  def Get_Http_Info.get_info(url)
    info = nil
    begin
      hInternet = InternetOpen()
      if (hInternet != 0)
        hService = InternetOpenUrl(hInternet, url)
        if (hService != 0)
          status_code = HttpQueryInfo(hService)
          if (status_code == HTTP_CODE_OK)
            info = InternetReadFile(hService)
          end
          InternetCloseHandle(hService)
        end
        InternetCloseHandle(hInternet)
      end
    rescue
      # 例外发生
      return nil
    end
    ary = []
    info.each_line do |line|
      next if line.empty?
      ary.push line
    end
    return ary[271].scan(/\w+<\/a>/)
  end
 
  def Get_Http_Info.get_html(url,bk)
    info = nil
   # begin
      hInternet = InternetOpen()
      if (hInternet != 0)
        hService = InternetOpenUrl(hInternet, url)
 
        if (hService != 0)
          status_code = HttpQueryInfo(hService)
          length=HttpQuerySize(hService).to_i
          if (status_code == HTTP_CODE_OK)
            #a=File.open(pathname,"wb")
            info = InternetReadFile(hService,length,bk)
          end
          InternetCloseHandle(hService)
        end
        InternetCloseHandle(hInternet)
      end
    #rescue
      # 例外发生
    #  return nil
    #end
 
    return info
  end
 
end

#==================================================


# 本脚本来自 [url]www.66rpg.com[/url] 使用和转载请保留此信息


#==================================================


class Get_Http_Info


  AGENT = "RGSS PLAYER"


  INTERNET_OPEN_TYPE_PRECONFIG = 0 # IEの設定を仕様


  INTERNET_OPEN_TYPE_DIRECT = 1 # プロキシを使用しない


 


  def Get_Http_Info.InternetOpen()


    io = Win32API.new('wininet', 'InternetOpen', %(p, l, p, p, l), 'l')


    hInternet = io.call(AGENT, INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0)


    return hInternet


  end


 


  def Get_Http_Info.InternetOpenUrl(hSession, url)


    iou = Win32API.new('wininet', 'InternetOpenUrl', %(l, p, p, l, l, l), 'l')


    hService = iou.call(hSession, url, nil, 0, 0, 0)


    return hService


  end


 


  def Get_Http_Info.InternetReadFile(hService,length,bk)


    content = ""


 


    read_size = 1024 # 一次读入文件的尺寸


    irf = Win32API.new('wininet', 'InternetReadFile', %(l, p, i, p), 'i')


    bk.call(0,length)


    id=0


    while(true)


      buf = "\0" * read_size


      red = [0].pack('L')


      irf.call( hService, buf, read_size, red )


      bk.call(id*read_size,length)


      id+=1


      # 读到文件末端


      break if (red.unpack('L') == [0])


      buf.delete!("\0")


      content += buf


    end


    return content


  end


 


  HTTP_QUERY_STATUS_CODE = 19


  CONTENT_LENGTH=5


  def Get_Http_Info.HttpQueryInfo(hService)


    read_size = 1024


    buf = "\0" * read_size


    red = [read_size-1].pack('L')


    hqi = Win32API.new('wininet', 'HttpQueryInfo', %(l, l, p, p, p), 'i')


    isOk = hqi.call( hService, HTTP_QUERY_STATUS_CODE, buf, red, nil)


    buf.delete!("\0")


    return buf


  end


 


  def Get_Http_Info.InternetCloseHandle(hInternet)


    ich = Win32API.new('winInet', 'InternetCloseHandle', %(l), 'i')


    isOk = ich.call(hInternet)


    return isOk


  end


 


  HTTP_CODE_OK = "200"


  def Get_Http_Info.HttpQuerySize(hService)


    read_size = 1024


    buf = "\0" * read_size


    red = [read_size-1].pack('L')


    hqi = Win32API.new('wininet', 'HttpQueryInfo', %(l, l, p, p, p), 'i')


    isOk = hqi.call( hService, CONTENT_LENGTH, buf, red, nil)


    buf.delete!("\0")


    return buf


  end


  def Get_Http_Info.get_info(url)


    info = nil


    begin


      hInternet = InternetOpen()


      if (hInternet != 0)


        hService = InternetOpenUrl(hInternet, url)


        if (hService != 0)


          status_code = HttpQueryInfo(hService)


          if (status_code == HTTP_CODE_OK)


            info = InternetReadFile(hService)


          end


          InternetCloseHandle(hService)


        end


        InternetCloseHandle(hInternet)


      end


    rescue


      # 例外发生


      return nil


    end


    ary = []


    info.each_line do |line|


      next if line.empty?


      ary.push line


    end


    return ary[271].scan(/\w+<\/a>/)


  end


 


  def Get_Http_Info.get_html(url,bk)


    info = nil


   # begin


      hInternet = InternetOpen()


      if (hInternet != 0)


        hService = InternetOpenUrl(hInternet, url)


 


        if (hService != 0)


          status_code = HttpQueryInfo(hService)


          length=HttpQuerySize(hService).to_i


          if (status_code == HTTP_CODE_OK)


            #a=File.open(pathname,"wb")


            info = InternetReadFile(hService,length,bk)


          end


          InternetCloseHandle(hService)


        end


        InternetCloseHandle(hInternet)


      end


    #rescue


      # 例外发生


    #  return nil


    #end


 


    return info


  end


 


end

feizhaodan · 发表于 2013-8-3 10:48:38

其实直接把数据内容写入文件就行了吧。
这个下载因该是直接下载文件数据，保持文件名相同因该就行了。

satgo1546 · 发表于 2013-8-3 12:43:59

我也不会

我反正对网络一窍不通你能拿我怎么样= =
然后我对编码不了解大概是编码？（……

end55rpg · 发表于 2013-8-3 12:49:04

satgo1546 发表于 2013-8-3 12:43
我也不会

我反正对网络一窍不通你能拿我怎么样= =

好吧
俺低估你了

帐号		自动登录	找回密码
密码			注册会员

[已经解决] 如何用Get_Http_Info读取的数据....

点评

点评

点评

点评

开拓者

贵宾