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

end55rpg · 发表于 2013-8-2 19:50:30

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由 end55rpg 于 2013-8-2 20:29 编辑

求保存为文件并能正确查看（如png图片）的办法
试了好一会儿，估计俺不行了。。。
怎么保存这些下载的

为PNG0.0

魔塔作家 · 发表于 2013-8-3 19:27:41

建议 LZ 去找一下 VB 的文件下载代码，在 VB 中用 API 的部分会比较多。

end55rpg · 发表于 2013-8-3 16:53:29

本帖最后由 end55rpg 于 2013-8-3 17:03 编辑

- -请删啊111111111

end55rpg · 发表于 2013-8-3 16:17:43

本帖最后由 end55rpg 于 2013-8-3 17:05 编辑

orzfly 发表于 2013-8-3 16:08
17 楼脚本，第 36 行应该改成原因是因为你在尝试加载二进制数据，所以数据中会存在 0 字符。
于是不能简单 ...

额，触。。。。
解决了
汗，原来俺用mashl啥玩意儿的不行- -好咯。。。。。
3Q~~~~~~~~~~~~~~~

orzfly · 发表于 2013-8-3 16:08:09

本帖最后由 orzfly 于 2013-8-3 16:12 编辑

17 楼脚本，第 36 行

buf.delete!("\0")

复制代码

应该改成

buf = buf[0, red.unpack('L')[0]]

复制代码

原因是因为你在尝试加载二进制数据，所以数据中会存在 0 字符。
于是不能简单的用 delete("\0") 来去掉字符串中的空值。

与此同时同样值得注意的是，这个 buf 并不应当作为 C 字符串（C-style zero-terminated string）来处理——去掉 \0 及以后的所有字符。
这只是一个任何数据都可能存放的 buffer。
InternetReadFile 的返回值已经充分返回了 buffer 中有效数据的长度。

如果阁下使用的是 Ruby 1.9+（RGSS3），这个脚本需要做一些编码方面的修改。主要是 force_encoding("ascii-8bit")。

@亿万星辰 @Sion @feizhaodan @satgo1546

顺便感谢 @晴兰。此回复有TA的贡献。

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

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

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

好吧
俺低估你了

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

我也不会

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

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

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

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

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

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

用 wb 来写

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

亿万星辰 · 发表于 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

复制代码

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

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

加入我们，或者，欢迎回来。

评分

点评

点评

浏览过的版块

开拓者

烫烫烫

贵宾