tc有什么办法能读出计算机名吗？

onlyclxy

cmd有个命令是systeminfo 可以调出系统信息。计算机名在第一项上。在cmd里存这些信息的命令是 systeminfo>>c:\1.txt  tc可以调用systeminfo这个命令，但是却无法运行systeminfo>>c:\1.txt 这个完整的命令。也就无法存下来这些信息。应该怎么做呢？
不过这个命令有个缺点，很慢啊！有没有别的办法能解决下呢？只要读出计算机名就行！谢谢！

cylhb

上面那个方法经测试，目前由于DLLCALL的兼容性，只能制作成插件方法实现。。。

接下来介绍一个更简单的方法。
var a=com("Wscript.Network")
   辅助.消息框(a.ComputerName)

TC的COM调用让我们更方便的使用各个系统组件，真爽

cylhb

试试直接用DLLCALL
Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
[说明]
取得这台计算机的名称
[参数表]
lpBuffer ------- String，随同计算机名载入的字串缓冲区
nSize ---------- Long，缓冲区的长度。这个变量随同返回计算机名的实际长度载入
[返回值]
Long，TRUE（非零）表示成功，否则返回零。会设置GetLastError

onlyclxy

回复 3楼cylhb的帖子

非常感谢！！！