Archive for July, 2004

用VB.NET测试硬盘速度

前日在用SiSoftware Sandra 2004测试硬盘性能时突发其想,用自己熟悉的VB.NET测试行不行呢?具体怎么做呢?

我们最感兴趣的是硬盘在最大负荷下持续的读取和写入速度。为了能够比较准确的测出平均速度,我决定采用先写入一个1GB的文件再读取出来的办法。考虑到不要让更多的任务花在循环上,我首先建立起一个足够大的缓冲区,然后往磁盘写入这个缓冲的内容,从而使硬盘达到最大的负荷。考虑到Windows的读取机制, Read more

小心!显卡BIOS刷新工具Nvflash变杀手

小心!显卡BIOS刷新工具Nvflash变杀手

2004-01-08■贺思聪■电脑报

前些年流行的CIH病毒曾使无数的主板毁于一旦,你有没有想过采用NVIDIA显示芯片的显卡也受着这样的威胁。

威胁就是来自Nvflash——NVIDIA公司所有显示卡BIOS的通用刷新工具。 Read more

如何用vb.net下载到完整的web页

在网络上找了很多关于网页下载的程序但都不能完整地得到web页的内容,以下这个函数解决了这个问题。

Private Function GetSource(ByVal url As String) As String
Try
Dim httpReq As System.Net.HttpWebRequest 'HttpWebRequest 类对 WebRequest 中定义的属性和方法提供支持',也对使用户能够直接与使用 HTTP 的服务器交互的附加属性和方法提供支持。
Dim httpResp As System.Net.HttpWebResponse ' HttpWebResponse 类用于生成发送 HTTP 请求和接收 HTTP 响'应的 HTTP 独立客户端应用程序。
Dim httpURL As New System.Uri(url)
httpReq = CType(WebRequest.Create(httpURL), HttpWebRequest)
httpReq.Method = "GET"
httpResp = CType(httpReq.GetResponse(), HttpWebResponse)
Dim reader As StreamReader = _
New StreamReader(httpResp.GetResponseStream, System.Text.Encoding.GetEncoding("GB2312")) '如是中文,要设置编码格式为“GB2312”。
Dim respHTML As String = reader.ReadToEnd() 'respHTML就是网页源代码
Return respHTML
httpResp.Close()
Catch e As Exception
Console.WriteLine("GetSource出现问题:{0},{1}", e.Message, url)
End Try
End Function

PDU解码器(vb.net)

解释手机的PDU码,可以自动识别短信息的格式并得出相应的发送地址、接受时间等。上面一个框填写PDU串,按OK以后会显示相应的信息。源代码里有我写的SMS类,比较实用。但由于初步设计类,SMS类还设计的不是很理想。还望高手指点。
下载地址:

  DecodePDU.rar (21.4 KiB, 452 hits)

1
Return top

BFBC2