曾经在一个公司看到过的，他们在原来显示Windows版本号的地方，将本机的计算机名和IP地址及当前登录名显示出来了，极大的方便了操作，省得我们网管总是要教User怎样看自己的IP地址和电脑名，有什么办法呢？

复制内容到剪贴板

代码:

@echo off

For /f "delims=: tokens=2" %%i in ('ipconfig /all^|find /i "IP Address"') do set IP=%%i
For /f "delims=: tokens=2" %%m in ('ipconfig /all^|find /i "Host Name"') do set HN=%%m

if exist %windir%\system32\oeminfo.ini del /f %windir%\system32\oeminfo.ini
echo [General] >%windir%\system32\oeminfo.ini
echo Manufacturer=%IP%>>%windir%\system32\oeminfo.ini
echo Model=%HN%/%username%>>%windir%\system32\oeminfo.ini

老大不行啊 ，要一直顯示到桌面上喲！

引用:

原帖由 sbfncel235 于 2007-12-5 20:08 发表
& B6 S: P% L# g6 M( B) }老大不行啊 ，要一直顯示到桌面上喲！

7 R' \* V; C- q% k- ~, Y. y

- J% P2 t' @" Y$ `8 I Y我还以为是显示在右键我的电脑属性那里哪,那行,我再改改
' t/ d" M' u: M- ~2 K4 Q. g5 J/ H% r0 a# v- E
* k! X( A' b6 k* z5 z) l
警告楼上的,不要灌水,自己删除水帖,等版主来删就会让你得不偿失了

那个好像是调用了web桌面做出的效果

你的效果就是要和webcast那样的

引用:

原帖由 铁牛阳光 于 2007-12-8 09:21 发表
' O. L& z( p4 p5 Q( P那个好像是调用了web桌面做出的效果

4 ?- E8 L; A, M) B2 A0 h$ P7 ]$ J- s6 E0 Z5 }
写个页面推到用户桌面

如果脚本写错了,开机会不会对客服端造成引响.

引用:

原帖由 qgh333 于 2007-12-20 10:51 发表 ' D# i9 G- t, P4 Y1 _$ k+ \ M$ B; z+ w
如果脚本写错了,开机会不会对客服端造成引响.

% F6 C, _5 R# [- [0 C$ N1 y) r F这种脚本只是对本机起作用,不会影响服务器

就像"叶"兄弟所说,生成一个HTM文件后放到桌面上
* u" V# O2 c. l' l代码参考

复制内容到剪贴板

代码:

@echo off

For /f "delims=: tokens=2" %%i in ('ipconfig /all^|find /i "IP Address"') do set IP=%%i
For /f "delims=: tokens=2" %%m in ('ipconfig /all^|find /i "Host Name"') do set HN=%%m

if exist E:\Documents\study\html\111.htm del /f E:\Documents\study\html\111.htm

echo IP地址:%IP%>>E:\Documents\study\html\111.htm
echo ^ >>E:\Documents\study\html\111.htm
echo 机器名:%HN%>>E:\Documents\study\html\111.htm
echo ^ >>E:\Documents\study\html\111.htm
echo 用户名:%username%>>E:\Documents\study\html\111.htm

另存为BAT文件,放入开机自动启动,会生成你需要的111.htm
$ S8 U7 U8 ^. M当然,你要先把111.HTM文件放到桌面上
# S) _& I+ T* E. O) `" V- M
! u1 C* w7 Q; W: {2 y3 s你甚至可以修改一下,把111改成about:blank

晕,居然把换行符给搞没了,上传个附件吧,改成BAT文件就行了

把附件里的文件放在服務器上發布就OK了！附件有點大上傳不了代碼如下
( h) j. {* e3 s* e/ g( FSet objShell = CreateObject("Wscript.shell")
" o+ a4 j8 x5 F: X" f( dSet objFSO = CreateObject("scripting.filesystemobject")
. o" e. F" T% }1 Z+ jIf objFSO.FileExists("cwindows\system32\bginfo.exe") = False Then! x& R6 p! e! ?/ b7 v
objFSO.CopyFile "\\serversIP\config\bginfo.exe","cwindows\system32\"' d, J6 I! A' V3 Z8 r1 I
objFSO.CopyFile "\\\serversIP\bob.bgi","cwindows\system32\"0 ^: c- `/ m9 p1 M) q% y# ?
objFSO.CopyFile "\\serversIP\config\BGInfo.bmp","c:\windows\"! U' I8 F2 e8 j" p( X/ n
'WScript.Echo "Copy Finished!"
+ l9 r+ T( Z1 z6 E set ws=wscript.createobject("wscript.shell") # l" T: ` B9 |2 o6 M- c
objShell.Run ("cacls.exe c:\windows\BGInfo.bmp /e /t /g users:F")
/ @: S2 y4 {% u4 i; t: w. z8 aEnd If- i2 D8 z+ {; O8 i
objShell.RegWrite "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\Bginfo","c:\windows\system32\bginfo.exe c:\windows\system32\bob.bgi /timer:0","REG_SZ"
% F, k& C5 H, robjShell.Run "bginfo.exe c:\windows\system32\bob.bgi /timer:0", ?+ ?+ I# H3 M, b9 m
WScript.Quit

上面这位仁兄 您的代码要保存为 bat格式的 还是 js格式的 还是 vbs格式的 ？

引用:

原帖由 modernist 于 2007-12-18 15:37 发表
" l) d! f$ N5 c3 k3 q8 t你的效果就是要和webcast那样的

0 C t" r* _2 L+ A+ P
' E0 o4 T! f3 G, V: _
$ ~2 ~* O; W' ?7 e v" f
对，就是要webcast视频里那种效果，您知道怎么弄吗？ 比如我想要 本地计算机的IP、计算机名、Mac地址等我想要的信息！您知道吗？

引用:

原帖由 qgh333 于 2007-12-20 10:51 发表
$ P3 v9 q8 F' L& O9 w) \: n如果脚本写错了,开机会不会对客服端造成引响.

7 r$ k6 R% a3 Z6 c, y2 \/ q5 O, l
# C$ z' X0 F0 N1 l) d, P如果是域环境，用组策略发布了脚本，脚本发生死循环的话，客户端登陆系统会很慢，如果是XP系统，他是先异步处理脚本还好！如果是除了XP以外的客户端，那么他要等很久，这个要看你的设置，默认是10分钟！

谁能把一些比如 IP、Mac、主机名等信息用vbs脚本编写出来呢？我想要，就把这些信息显示在桌面桌面右下角的某个地方！

引用:

原帖由 tian930 于 2008-1-4 11:12 发表
( x5 h/ a: c- }0 O, q- L' P上面这位仁兄 您的代码要保存为 bat格式的 还是 js格式的 还是 vbs格式的 ？

; W7 h% v: s4 M
BGInfo軟件可顯示，登入帳戶、電腦名、IP、MAC 、RAM 、CPU、磁盤空間、OS版本等，3 X5 ]0 ?4 B- L7 R- {( g3 \
可在GPO發布，聲明客戶端需提升權限Admin或Powers ，一次性派送，派送完后可取消派送也可降到USERS權限去。

受教了，多谢