首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

哪个高手,能把这个C#给弄成VB.NET?上载图用

2012-10-07 
哪个高手,能把这个C#给弄成VB.NET?下载图用1,WebRequest和WebResponseWebRequest request WebRequest.Cr

哪个高手,能把这个C#给弄成VB.NET?下载图用
1,WebRequest和WebResponse

WebRequest request = WebRequest.Create("http://images.cnblogs.com/logo_small.gif"); 
WebResponse response = request.GetResponse(); 
Stream reader = response.GetResponseStream(); 
FileStream writer = new FileStream("x:\\pic.jpg", FileMode.OpenOrCreate, FileAccess.Write);
byte[] buff = new byte[512]; 
int c = 0; //实际读取的字节数 
while ((c=reader.Read(buff, 0, buff.Length)) > 0)
 {  
writer.Write(buff, 0, c); 
}
 writer.Close();
 writer.Dispose(); 
reader.Close();
 reader.Dispose();
 response.Close();


希望给改成VB.NET



[解决办法]

VB.NET code
WebRequest request = WebRequest.Create("http://images.cnblogs.com/logo_small.gif")Dim response As WebResponse = request.GetResponse()Dim reader As Stream = response.GetResponseStream()Dim writer As New FileStream("x:\pic.jpg", FileMode.OpenOrCreate, FileAccess.Write)Dim buff(511) As ByteDim c As Integer = 0 '实际读取的字节数c=reader.Read(buff, 0, buff.Length)Do While c > 0writer.Write(buff, 0, c)    c=reader.Read(buff, 0, buff.Length)Loop writer.Close() writer.Dispose()reader.Close() reader.Dispose() response.Close() 

热点排行