登录后绑定QQ、微信即可实现信息互通
核心代码:Function ShowDriveType(drvpath)Dim fso, d, tSet fso = CreateObject("Scripting.FileSystemObject")Set d = fso.GetDrive(fso.GetDriveName(drvpath))Select Case d.DriveType Case 0 t = "Unknown" Case 1 t = "Removable"'移动硬盘 ..
复制代码 代码如下:'Hardware_Info.vbs v1.1 BY: fastslzOn Error Resume NextDim WMI,WS,FsoSet WMI = GetObject("Winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")Set cOSs = WMI.ExecQuery("Select * from Win32_OperatingSystem")F..
提出你的第一个问题
回答一个你擅长的问题
对内容进行点赞或者收藏
阅读声望与权限的规范
完善个人资料