很难的题，解答了，高分相送!

Question

你可以试一下用vb来读取任何jsp或者html文件呀？看是不是出现乱码!

Answer 1

本人试了试,没有问题啊
Option Explicit
'此代码在某窗体上,些窗体上控件如下: Command1按钮,Text1文本框,CommonDialog1通用对话框
'不需要对控件做任何设置,直接把此代码Copy到窗体代码窗口下Private Sub Command1_Click()
Dim dFile As String
Dim dData() As ByteMe.CommonDialog1.ShowOpen
dFile = Me.CommonDialog1.FileNameIf dFile = "" Then Exit SubOpen dFile For Binary As #1ReDim Preserve dData(LOF(1) - 1)Get #1, , dData
Close #1Me.Text1.Text = StrConv(dData, vbUnicode)
End Sub

Answer 2

楼上,请看清楚
是html格式,jsp格式的文件,我这样已经试过vb的三种方法了,binary也试过了,

Answer 3

原因在于vb是支持unicode的,而网页是utf-8的,有哪位可以转码,或用其它方法实现均可,一旦解决,分数马上给!!!!

Answer 4

＜%@ page contentType="text/html; charset=gb2312"%＞ 
加在html试试

Answer 5

    Dim objFSO As Object
    Dim objText As Object
    Dim strResult As String    Set objFSO = New FileSystemObject    Set objText = objFSO.OpenTextFile(App.Path & "\web\info_temp.html", _
                  ForReading, False, TristateUseDefault)    strResult = objText.ReadAll()一直用

Answer 6

jokeD() 兄,这个加上去也是一样的
因为网页本身都是utf-8编码的

Answer 7

yangao兄,这样跟vb三种读取文件一样的结果的,你多试一下就知道了,要读取网页,而不是txt文件!!

Answer 8

编码问题，VB 没有内置 UTF-8 的编码，你要自己解码

Answer 9

http://community.csdn.net/Expert/TopicView.asp?id=5028000