this.listView1.View=View.Details;
this.listView1.GridLines=true;
this.listView1.Columns.Add("环境变量",150,HorizontalAlignment.Left);
this.listView1.Columns.Add("变量值",150,HorizontalAlignment.Left);
ListViewItem myItem;
foreach (DictionaryEntry EnValue in Environment.GetEnvironmentVariables())
{
myItem= new ListViewItem(EnValue.Key.ToString(),0);
myItem.SubItems.Add(EnValue.Value.ToString());
this.listView1.Items.Add(myItem);
}
this.listView1.GridLines=true;
this.listView1.Columns.Add("环境变量",150,HorizontalAlignment.Left);
this.listView1.Columns.Add("变量值",150,HorizontalAlignment.Left);
ListViewItem myItem;
foreach (DictionaryEntry EnValue in Environment.GetEnvironmentVariables())
{
myItem= new ListViewItem(EnValue.Key.ToString(),0);
myItem.SubItems.Add(EnValue.Value.ToString());
this.listView1.Items.Add(myItem);
}
解决方案 »
- 请问Session是保存在哪的
- 为什么我的VS2005安装上后无法创建SQL SERVER数据库?
- 如何用多线程来实现ping多台机器?
- 如何将object[,]数组中的内容输出到txt文本中去?
- table.Columns.Add问题(急!!!!)
- GRIDCONTROL,往里面填充数据,再添加 ,添加新行时,点击第二列时,第一列的值就没有了。
- datagridview数据绑定问题~~~~~~~~~~~~~~~~~~~~
- 项目失败,我失业,散分
- 请教高手
- VS.NET中VC#建的ASP.NET解决方案,在启动后,生成的网页中,看不到WEB控件
- 数组转换成object,然后怎么再转换成数组,急!!!!
- 还原数据库,在sql server 2000 中还原有时可以,有时不行,但在c#却不行??? 在线等待?
http://www.csdn.net/Develop/Read_Article.asp?Id=3664得到硬盘信息
Imports System.Management
Public Class Form1
Inherits System.Windows.Forms.Form#Region " Windows Form Designer generated code " Public Sub New()
MyBase.New()
InitializeComponent()
End Sub Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
Private components As System.ComponentModel.IContainer
Friend WithEvents ListBox1 As System.Windows.Forms.ListBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.ListBox1 = New System.Windows.Forms.ListBox
Me.SuspendLayout()
'
'ListBox1
'
Me.ListBox1.Location = New System.Drawing.Point(8, 8)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(272, 212)
Me.ListBox1.TabIndex = 0
'
'Form1
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(292, 238)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.ListBox1})
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False) End Sub#End Region Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load On Error Resume Next
Dim HDDDeviceQuery As New SelectQuery("Win32_DiskDrive")
Dim HDDDeviceSearch As New ManagementObjectSearcher(HDDDeviceQuery)
Dim HDDDeviceInfo As ManagementObject
For Each HDDDeviceInfo In HDDDeviceSearch.Get()
ListBox1.Items.Add("HDD Description: " & HDDDeviceInfo("caption").ToString())
ListBox1.Items.Add("HDD BytesPerSector: " & HDDDeviceInfo("BytesPerSector").ToString())
ListBox1.Items.Add("HDD CompressionMethod: " & HDDDeviceInfo("CompressionMethod").ToString())
ListBox1.Items.Add("HDD Index: " & HDDDeviceInfo("Index").ToString())
ListBox1.Items.Add("HDD InstallDate: " & HDDDeviceInfo("InstallDate").ToString())
ListBox1.Items.Add("HDD Manufacturer: " & HDDDeviceInfo("Manufacturer").ToString())
ListBox1.Items.Add("HDD Partitions: " & HDDDeviceInfo("Partitions").ToString())
ListBox1.Items.Add("HDD Size: " & Int(Val(HDDDeviceInfo("Size").ToString()) / 2 ^ 30) & " GBytes")
ListBox1.Items.Add("HDD TotalCylinders: " & HDDDeviceInfo("TotalCylinders").ToString())
ListBox1.Items.Add("HDD TotalSectors: " & HDDDeviceInfo("TotalSectors").ToString())
ListBox1.Items.Add("HDD TracksPerCylinder: " & HDDDeviceInfo("TracksPerCylinder").ToString())
ListBox1.Items.Add("HDD TotalHeads: " & HDDDeviceInfo("TotalHeads").ToString())
ListBox1.Items.Add("HDD TotalTracks: " & HDDDeviceInfo("TotalTracks").ToString())
ListBox1.Items.Add("HDD SectorsPerTrack: " & HDDDeviceInfo("SectorsPerTrack").ToString())
ListBox1.Items.Add("HDD SCSILogicalUnit: " & HDDDeviceInfo("SCSILogicalUnit").ToString())
Next
End Sub
End Class
例如://獲取內存大小,可用內存大小,ServicePack Version
ManagementClass manger = new ManagementClass("Win32_OperatingSystem");
manger.Get();
foreach(ManagementObject info in manger.GetInstances())
{
string sMemorySize = info["TotalVisibleMemorySize"].ToString();
string sFreeSize = info["FreePhysicalMemory"].ToString();
string sServicePackVersion = info["CSDVersion"].ToString();
}
//獲取主板信息,處理器個數
ManagementClass manger = new ManagementClass("Win32_OperatingSystem");
manger.Get();
foreach(ManagementObject info in manger.GetInstances())
{
string sModel = info["Model"].ToString();
string sProcessorCount = info["NumberOfProcessors"].ToString();
}
//限於篇幅,還有獲取磁盤信息,進程信息等,
需要的的話,我可以給你一個我寫的ServerMonitor , 就是利用這個技術來監視遠端Server的
QQ : 830390
MSN : [email protected]
system.management命名空间下的类。
ms-help://MS.NETFrameworkSDKv1.1.CHS/cpref/html/frlrfSystemManagement.htm