救命啊!哪位救世主能把以下下载程序由VB代码变为c++builder代码?

[map_killer]

Dim b() As Byte

b() = Inet1.OpenURL(Text1.Text, icByteArray)
Open Text2.Text For Binary Access Write As #1
Put #1, , b()
Close #1
End If


如果用到控件,请指明

[FFSB]

AnsiString b = Inet1->OpenURL(Text1->Text, icByteArray);

int fp = FileOpen(Text2->Text,fmCreate);

FileWrite(fp,b.c_str(),b.Length());
FileClose(fp);
} // End if

[FFSB]

Inet1这是什么东东?

[map_killer]

好象不行啊,主要是OpenURL函数不会用!!!

[柯本]

VB这段程序的功能是将Text1中的网页容存到Text2文件中,在BCB中,可用indy的TIdHTTP实现:

TMemoryStream *s=new TMemoryStream();
IdHTTP1->Get(Edit1->Text,s);
s->SaveToFile(Edit2->Text);
delete s;

[map_killer]

高手,谢谢了!!!!!
------李昌