<# :
cls&@echo off

set ___sv=\\192.168.1.2\Y
net use *  %___sv% "ffu" /user:administrator

for /f "usebackq delims=" %%a in (`PowerShell -c "type -Literal '%~f0'|out-string|iex"`) do (
set "___f=%%a"
)
copy /y "%___f%" "%___sv%"
echo y|net use * /del
timeout /t 2 1>nul&pause&exit/b
#>

#http://www.bathome.net/post.php?action=reply&fid=5&tid=68226&repquote=277711&extra=page%3D1&page=2

# 获取内存信息
function Get_Info_Memory() {
#$memoryInfo = Get-CimInstance -ClassName Win32_PhysicalMemory
$memoryInfo = Get-wmiobject -Class Win32_PhysicalMemory
[void]$info.add( "内存：【 $( ($memoryInfo | Measure-Object).Count ) 】" )
[void]$info.add( "    总容量： {0} GB" -f $( ( $memoryInfo | Measure-Object -Property Capacity -Sum ).Sum / 1GB ) )
foreach ($memory in $memoryInfo) {
#$( $memory.BankLabel )
[void]$info.add( "    #   插槽    ： $( $memory.DeviceLocator )" )
[void]$info.add( "        品牌    ： $( $memory.Manufacturer )" )
[void]$info.add( "        序列号  ： $( $memory.SerialNumber )" )
[void]$info.add( "        容量    ： $( $memory.Capacity / 1GB ) GB" )
[void]$info.add( "        最高频率： $( $memory.Speed )" )
}
[void]$info.add( "" )
if($ooo.count){[void]$ooo.add([int64](( $memoryInfo | Measure-Object -Property Capacity -Sum ).Sum / 1GB))}
}

# 获取硬盘信息
function Get_Info_Disk() {
#$diskInfo = Get-CimInstance -ClassName Win32_DiskDrive | Where-Object { $_.MediaType -eq 'Fixed hard disk media' }
$diskInfo = Get-wmiobject -Class Win32_DiskDrive | Where-Object { $_.MediaType -eq 'Fixed hard disk media' }
if($BuildVersion.Major -ge '10'){
foreach ($disk in $diskInfo) {
$physicalDisk = Get-PhysicalDisk | Where-Object { ('\\.\PHYSICALDRIVE' + $_.DeviceID ) -eq $disk.DeviceID }
Add-Member -InputObject $disk -MemberType NoteProperty -Name BusType -Value $physicalDisk.BusType
}}
[void]$info.add( "硬盘：【 $( ($diskInfo | Measure-Object).Count ) 】" )
foreach ($disk in $diskInfo) {
[void]$info.add( "    #   DeviceID： $( $disk.DeviceID )" )
[void]$info.add( "        BusType ： $( $disk.BusType )" )
[void]$info.add( "        型号    ： $( $disk.Model )" )
[void]$info.add( "        序列号  ： $( $disk.SerialNumber )" )
[void]$info.add( "        容量    ： $( [int]($disk.Size / 1GB) ) GB" )
}
[void]$info.add( "" )
if($ooo.count){[void]$ooo.add([int64](($diskInfo | Measure -sum -Property size).sum / 1GB))}
}

$ooo=[System.Collections.ArrayList]@()
[void]$ooo.add($env:COMPUTERNAME)
$info = [System.Collections.ArrayList]@()
Get_Info_Memory
Get_Info_Disk
$fff=$env:TEMP+'\'+$ooo[2]+'g_'+$ooo[1]+'g_'+$ooo[0]+'.txt'
#$info | Out-File -LiteralPath $fff
[io.file]::WriteAllText($fff,($info|out-string))
$fff
复制代码

'&cls&@echo off&powershell -c "''"&cscript -e >nul
@rem 仅第一个接口的ip
@set @@ip=&for /f "tokens=2 delims= " %%a in ('arp -a') do if not defined @@ip set @@ip=%%a
@set /a @@ip=(%@@ip:~-1%+0)%%5+1
@timeout /t %@@ip%&set "@@ip="
复制代码

rem 另存为 ANSI 编码 bat
' & cls & cscript.exe /nologo /e:vbscript "%~f0" %* & exit /b
 
S = "192.168.0.254"    '教师机的IP或计算机名
U = "administrator"    '用户名
P = "12345678"         '密码
 
t = ""
Set oWMI = GetObject("Winmgmts:\\.\Root\Cimv2")
For Each i In oWMI.InstancesOf("Win32_PhysicalMemory")
    t = t & CInt(i.Capacity / 1024 ^ 3) & "G" & "&"
Next
For Each i In oWMI.InstancesOf("Win32_DiskDrive")
    t = t & CInt(i.Size / 1024 ^ 3) & "G" & "&"
Next
For Each i In oWMI.InstancesOf("Win32_OperatingSystem")
    n = i.CSName
Next
Set oFSO = CreateObject("Scripting.FileSystemObject")
Set oTextStream = oFSO.OpenTextFile(t & n & ".txt", 2, True)
oTextStream.Write t & n
oTextStream.Close()
Set oWshShell = CreateObject("WScript.Shell")
Randomize
s = Int(10 * Rnd() + 1)
oWshShell.Run "ping 127.0.0.1 -n " & s, 0, True
oWshShell.Run "net use \\" & S & " " & P & " /user:" & U, 0, True
oFSO.CopyFile t & n & ".txt", "\\" & S  & "\Y\"
oWshShell.Run "net use \\" & S & " /delete", 0, True
复制代码