我现在在安装无盘工作站时遇到一个问题,想自己编一个程序.我使用delphi编程的,但自己水平欠佳.我想请您帮忙编一个程序完成以下功能:
1.在Windows NT上运行
2.从有盘工作站复制文件(C盘内容,例如netpc计算机中共享的C)到共享目录.例如复制到\skynet\w98se中
3.在共享目录中自动建立文件夹并共享之.例如user01,user02,user03…(即\skynet\w98se\user01)
4.在域用户管理器中自动添加共享用户,并可选性的设置用户登录密码
5.允许修改工作站的IP键值并写入user01.ip,user02.ip…user30.ip中,例如将0000修改为0001
6.自动设置工作站的IP地址并写入user01.ip,user02.ip…user30.ip中
7.更改9A270BE0-A9D7-11D4-87AD-B0451C2F8855值为有盘工作站的实际数值
8.备份rpl\rplfiles\binfiles中的win95为win95.95并将改好的WIN95拷贝到服务器上rpl\rplfiles\binfiles
即将本程序下的win95文件夹中内容复制到指定的rpl\rplfiles\binfiles\win95下
9.自动在rpl\rplfiles\Profiles下建立一个文件夹win98并将安装程序文件夹下的suboot复制到win98中
用户界面所用到的数据:
目标服务器(例如skynet)
源工作站名(例如netpc)
共享目录名(例如w98se)
用户名前缀(例如user)
用户名数量(例如30,即user01,user02,user03…user30)
IP键值(例如0001)
IP地址(例如从192.168.10.1递增到192.168.10.30.只需第一个地址,程序自动累加)
Identities设置(例如9A270BE0-A9D7-11D4-87AD-B0451C2F8855)
其它数据
1.在NT中使用
NET USER %PREFIX%51 %PREFIX%51 /ADD /ACTIVE:YES /COMMENT:“LITENET PC CLIENT USER” /EXPIRES:NEVER
即:net use user01 user01 /add /active:yes /comment:“Rpl win98 client users” /expires:never
即:net use 用户名 密码 /add /active:yes /comment:“备注” /expires:never
添加用户名(在域用户管理器中)
2.复制完毕后,自动设置system.ini,在[386enh]中添加PagingDrive=s:
3.自动运行setup98.exe(外挂程序)
补遗
1.自动修改user01.ip,user02.ip…user30.ip中的
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0000]
“IPAddress”=“192.168.10.1”
(1)0000键值,例如:0001
(2)IP地址,例如:user01:192.168.10.1;user02:192.168.10.2;user03:192.168.0.3
2.自动修改user01.zip,user02.zip…user30.zip中的
[HKEY_USERS.DEFAULT\Identities{9A270BE0-A9D7-11D4-87AD-B0451C2F8855}\Software\Microsoft\Outlook Express\5.0]
“Store Root”=“S:\Application Data\Identities\{9A270BE0-A9D7-11D4-87AD-B0451C2F8855}\Microsoft\Outlook Express\”
更改{9A270BE0-A9D7-11D4-87AD-B0451C2F8855}为您复制的有盘工作站的实际数值
3.分别将user01.zip,user02.zip…user30.zip复制到\skynet\w98se\user01,\skynet\w98se\user02…\skynet\w98se\user30中
可参见netpc网之鹰无盘公共文件夹中的client程序
附user01.ip的内容
REGEDIT4
[HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0000]
“IPAddress”=“192.168.10.1”
“IPMask”=“255.255.255.0”
[HKEY_LOCAL_MACHINE\Network\Logon]
“username”=“USER01”
[HKEY_USERS.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders]
“AppData”=“S:\Application Data”
“Recent”=“S:\Recent”
“Cache”=“S:\Temporary Internet Files”
“Cookies”=“S:\Cookies”
“History”=“S:\History”
“Personal”=“S:\My Documents”
[HKEY_USERS.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders]
“AppData”=“S:\Application Data”
“Recent”=“S:\Recent”
“Cache”=“S:\Temporary Internet Files”
“Cookies”=“S:\Cookies”
“History”=“S:\History”
“Personal”=“S:\My Documents”
[HKEY_USERS.DEFAULT\Software\Microsoft\Windows\CurrentVersion\ProfileReconciliation\AppData]
“DefaultDir”=“S:\Application Data”
[HKEY_USERS.DEFAULT\Software\Microsoft\Windows\CurrentVersion\ProfileReconciliation\Cookies]
“DefaultDir”=“S:\Cookies”
[HKEY_USERS.DEFAULT\Software\Microsoft\Windows\CurrentVersion\ProfileReconciliation\History]
“DefaultDir”=“S:\History”
[HKEY_USERS.DEFAULT\Software\Microsoft\WAB\WAB4\Wab File Name]
@=“S:\Application Data\Microsoft\Address Book\user01.wab”
[HKEY_USERS.DEFAULT\Identities{559A2820-BFE1-11D4-93E8-FB651470B409}\Software\Microsoft\Outlook Express\5.0]
“Store Root”=“S:\Application Data\Identities\{559A2820-BFE1-11D4-93E8-FB651470B409}\Microsoft\Outlook Express\”