【不回复也可见】【20120621】ZHS多功能维护盘【简繁体中文菜单】【绝版】

chanel

小小输入法还是不够智能，许多词汇都打不出来。如果

chanel

小小输入法还是不够智能，许多词汇都打不出来。如果不纠结体积，还是换成搜狗吧。

zhs509

原帖由 chanel 于 2012-5-8 17:32 发表
小小输入法还是不够智能，许多词汇都打不出来。如果不纠结体积，还是换成搜狗吧。

对于用搜狗就更纠结了。。。
那还不如用我自己精简的QQ拼音

其实紫光拼音精简版的也不错，就是标点符号直接输入有点问题，当然可以用软键盘输入

2011mking

原帖由 zhs509 于 2012-5-8 17:25 发表

嘿嘿 楼上的DIY的效果不错啊。。。

我好像开机直接PECMD调用的，临时目录好像没立即生效——注销后生效，我不知道直接运行是否立即生效
（开机自动配置运行后，我在运行输入%temp%的，打开是X盘的原来的目 ...

我的可以直接生效（进桌面前加载 ），没测试过你的这个PE,估计原因是pecmd Load问题，试试在ini中加载临时盘，再创建点快捷方式，如果没创建成功，则是pecmd的问题。

pecmd的加载有时总出这种奇怪现象，也许是未知某个条件所致。所以我加载外置用的是CMD。

zhs509

原帖由 2011mking 于 2012-5-8 17:35 发表


我的可以直接生效，没测试过你的这个PE,估计原因是pecmd Load问题，试试在ini中加载临时盘，再创建点快捷方式，如果没创建成功，则是pecmd的问题。

pecmd的加载有时总出这种奇怪现象，也许是未知某个条件 ...

我好像直接加载的用mset和setx都没一次成功的，好像之前再手动运行一次成功

或注销也行

或许我可以尝试2此执行变量设置看看 或者干脆放在启动开机自动运行然后自动删除

[ 本帖最后由 zhs509 于 2012-5-8 17:38 编辑 ]

elai

原帖由 zhs509 于 2012-5-8 17:25 发表

嘿嘿 楼上的DIY的效果不错啊。。。

我好像开机直接PECMD调用的，临时目录好像没立即生效——注销后生效，我不知道直接运行是否立即生效
（开机自动配置运行后，我在运行输入%temp%的，打开是X盘的原来的目 ...

哈哈，这看起来和原版差不多！
直接运行创建内存盘R盘,并设置R盘为临时目录.exe是即时生效的！看。。。


[ 本帖最后由 elai 于 2012-5-8 17:40 编辑 ]

zhs509

原帖由 elai 于 2012-5-8 17:37 发表

哈哈，这看起来和原版差不多！
直接运行创建内存盘R盘,并设置R盘为临时目录.exe是即时生效的！看。。。
142537

你在“运行”输入“%temp%”看看打开的是哪个目录，是原来的还是R盘的？

截图效果我和你的相同，就是运行打开的目录不同，也就是还没生效，可能和pecmd执行有关吧

手动运行的我好像也没问题

[ 本帖最后由 zhs509 于 2012-5-8 17:40 编辑 ]

elai

原帖由 zhs509 于 2012-5-8 17:39 发表

你在运行输入“%temp%”看看打开的是哪个目录，是原来的还是R盘的？

手动运行的我好像也没问题

是R盘的！
我再试试开机直接PECMD调用看看！

[ 本帖最后由 elai 于 2012-5-8 17:45 编辑 ]

2011mking

下载过我整合的157M的PE可以试试，用这个配置是在进入桌面前生效
外置安装.cmd
-----------------------------------
@echo off
PUSHD %~dp0
::显卡驱动
LoadDrv.exe %cd%\drv\VCARD.CAB
::声卡驱动
LoadDrv.exe %cd%\drv\ACARD.CAB
::网卡驱动
LoadDrv.exe %cd%\drv\WNIC.CAB

if Exist R:\ (goto 软件安装)
imdisk -a -s 1024M -m R: -p "/fs:ntfs /y /q"

::软件安装
md R:\temp
Set  TempPath=R:\Temp
Mset Temp %TempPath%
Mset Tmp  %TempPath%
Mset Temp %TempPath% /system
Mset Tmp  %TempPath% /system
md R:\IECache
reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "Cache" /t reg_expand_sz /d "R:\IECache\Temporary Internet Files" /f>nul

[ 本帖最后由 2011mking 于 2012-5-8 17:50 编辑 ]

zhs509

原帖由 elai 于 2012-5-8 17:40 发表

是R盘的！

没问题就好。。。

zhs509

原帖由 2011mking 于 2012-5-8 17:45 发表
下载过我整合的157M的PE可以试试，用这个配置是在进入桌面前生效
外置安装.cmd
-----------------------------------
@echo off
PUSHD %~dp0
::显卡驱动
LoadDrv.exe %cd%\drv\VCARD.CAB
::声卡驱动
Lo ...

R:/Temp
这句是不是符号弄反了？

应该是 R:\Temp吧？

2011mking

写错了，是R:\Temp

zhs509

原帖由 2011mking 于 2012-5-8 17:48 发表
写错了，是R:\Temp

我也是今天后面才发现的。。。
后面我自己已经改正了

2011mking

不过好象没影响，Ms好象有修正。现在在外面，回家再看看反写的/是不是Ms自动修正了。

2011hiboy

原帖由 2011mking 于 2012-5-8 17:03 发表
if exist %windir%\system32\drivers\imdisk.sys goto :装载Ramdisk
imdisksetup.exe
:装载Ramdisk
.....

----------------------------------
另外，拟了一个跳过空盘驱动器的搜索，有兴趣的可以试试
...

我用联想机器试了下，没反应啊
----------------------------------------------------------
On Error Resume Next
Dim fso, SubDrives, i,File
Set fso = CreateObject("Scripting.FileSystemObject")
Set SubDrives = fso.Drives
set ws=WScript.CreateObject("WScript.Shell")
For Each i In SubDrives
    File=i.DriveLetter & "\petools\xx.exe"
    if i.IsReady=true then
      if  fso.FileExists(File) then
        ws.Run File,0 :Exit For
      End if
    End if
Next
-------------------------------------------------------------
单独运行\petools\xx.exe能够加载外置，就是有错误提示！！

chanel

原帖由 zhs509 于 2012-5-8 12:15 发表

IP工具这个自己配置外置就是了。。。
pecmd的LINK、FILE、EXEC这几条命令就够了。。。

难道Z大忘了，UD合盘里的Win7PE.ISO是不能DIY滴。

zhs509

原帖由 chanel 于 2012-5-8 18:06 发表

难道Z大忘了，UD合盘里的Win7PE.ISO是不能DIY滴。

不能DIY，但是可以配置外置。。。

可以是自动创建任意分区或UD区PETOOLS的快捷方式到开始菜单，建议直接UD区配置下就是了，反正就那几个小文件。。。

2011mking

原帖由 2011hiboy 于 2012-5-8 18:01 发表


我用联想机器试了下，没反应啊
----------------------------------------------------------
On Error Resume Next
Dim fso, SubDrives, i,File
Set fso = CreateObject("Scripting.FileSystemObject" ...

请注意看前面的备注呀，你用exe加载，不要选隐藏参数了
    File=i.DriveLetter & "\petools\xx.exe"
    if i.IsReady=true then
      if  fso.FileExists(File) then
        ws.Run File,0 :Exit For

应该用
ws.Run File :Exit For

2011mking

原帖由 zhs509 于 2012-5-8 17:49 发表

我也是今天后面才发现的。。。
后面我自己已经改正了

::软件安装
md R:\temp
Set  TempPath=R:/Temp
Mset Temp %TempPath%
Mset Tmp  %TempPath%
Mset Temp %TempPath% /system
Mset Tmp  %TempPath% /system

虽然其中/写反了，但Ms确实纠正了。难道环境变量中的\ ms会自动修正？

elai

刚才试了一下，开机PECMD调用“创建内存盘并设置临时文件夹.exe”也是即时生效的！只是调用时要放在PECMD.INI靠前一些，如下命令：

//用户登录界面
     EXEC !%SystemRoot%\System32\tsdiscon.exe
     EXEC !=net start gpsvc
     HOTK #255,PECMD.EXE SHUT   //电源键关机
     EXEC !%ProgramFiles%\Keys\创建内存盘并设置临时文件夹.exe
//////////////////////////////////////////////////////////////////////////////////////////////
/////Network////////////////////////////////////////////////////////////////////////////////////
//-----------------------------------网络服务------------------------------------------

zhs509

原帖由 elai 于 2012-5-8 18:25 发表
刚才试了一下，开机PECMD调用“创建内存盘并设置临时文件夹.exe”也是即时生效的！只是调用时要放在PECMD.INI靠前一些，如下命令：

那应该是要靠前一些调用，我下面的代码应该也是没问题的，我修改的pe刚好自带了setx.exe
我是进入桌面后pecmd调用的批处理，IE的有生效。临时目录的没生效，但注销也生效了

1. @echo off
   
2. color 0a
   
3. pushd %~dp0
   
4. echo.
   
5. if not exist Y: EXIT
   
6. 
   
7. if not exist Y:\IECache (md Y:\IECache\)
   
8. if exist "Y:\IECache" (if not exist Y:\IECache\ (del /f /s /q Y:\IECache && md Y:\IECache\))
   
9. reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders" /v "Cache" /t reg_expand_sz /d "Y:\IECache\Temporary Internet Files" /f>nul
   
10. 
    
11. if not exist Y:\temp (md Y:\temp\)
    
12. if exist Y:\temp (if not exist Y:\temp\ (del /f /s /q Y:\temp && md Y:\temp\))
    
13. Set TempPath=Y:\Temp
    
14. setx.exe Tmp %TempPath%
    
15. setx.exe Tmp %TempPath% /m
    
16. setx.exe Temp %TempPath%
    
17. setx.exe Temp %TempPath% /m

复制代码

[ 本帖最后由 zhs509 于 2012-5-8 18:31 编辑 ]

2011hiboy

想要开机调用压根就不要那么复杂了，直接导入注册表修改及OK了。
压根用不到setx.exe或者Mset.exe
...普通方式修改需要注销才能生效，开机调用就不需要了，相当于重启，更能生效

2011mking

if not exist Y: EXIT
没有Y:就退出了？应该是 if  exist Y: EXIT 吧？

2011hiboy

原帖由 2011mking 于 2012-5-8 18:16 发表


请注意看前面的备注呀，你用exe加载，不要选隐藏参数了
    File=i.DriveLetter & "\petools\xx.exe"
    if i.IsReady=true then
      if  fso.FileExists(File) then
        ws.Run File,0 :Exit  ...

我改了可以依旧没用；我电脑上两个U盘，一个量产成硬盘，还有一个正常

外置和VBS文件放在正常的U盘里面，点击VBS，结果没反应，量产成硬盘模式的U盘灯会闪，但正常的U盘灯都不闪
-----------------------------------------------------
On Error Resume Next
Dim fso, SubDrives, i,File
Set fso = CreateObject("Scripting.FileSystemObject")
Set SubDrives = fso.Drives
set ws=WScript.CreateObject("WScript.Shell")
For Each i In SubDrives
File=i.DriveLetter & "\petools\xx.exe"
    if i.IsReady=true then
      if  fso.FileExists(File) then
         ws.Run File :Exit For
      End if
    End if
Next

zhs509

原帖由 2011mking 于 2012-5-8 18:34 发表
if not exist Y: EXIT
没有Y:就退出了？应该是 if  exist Y: EXIT 吧？

内存盘Y盘的创建代码我放在了PECMD.INI里面了

这里先检测是否存在Y盘，不存在Y盘说明内存不够大，我默认不创建它

只有创建了Y盘，我才设置临时目录和IE缓存到Y盘

因此现判断是否存在Y盘，若存在再设置变量等

[ 本帖最后由 zhs509 于 2012-5-8 18:43 编辑 ]

2011mking

原帖由 2011hiboy 于 2012-5-8 18:31 发表
想要开机调用压根就不要那么复杂了，直接导入注册表修改及OK了。
压根用不到setx.exe或者Mset.exe
...普通方式修改需要注销才能生效，开机调用就不需要了，相当于重启，更能生效

这是要根据需要是否要转移Temp，对小内存用户来说是用不着的，所以要动态加载。

2011hiboy

我觉得把文件做在那，让用户自己选择挺好的。

小内存的用户跑不了win7pe，最起码2G，而2G的用户可以设置RAM盘可是设置达到500MB呢

还请大大帮忙看看外置搜索，zhs509修改的可以隐藏空驱动器，但有个致命的bug，

就是我的U盘拔了那个盘符还在那，一个新的空驱动器，插上U盘就好了，如果插上另外一个U盘，那么这个U盘会有两个盘符

。。。。。。。。不会VBS，干着急呢。。。

zhs509

原帖由 2011hiboy 于 2012-5-8 18:47 发表
我觉得把文件做在那，让用户自己选择挺好的。

小内存的用户跑不了win7pe，最起码2G，而2G的用户可以设置RAM盘可是设置达到500MB呢

还请大大帮忙看看外置搜索，zhs509修改的可以隐藏空驱动器，但有个致命的 ...

所以我才说老大的方法相对比较完美一些。。。

我只是去掉了dos时代菜鸟的部分代码。。。

例如我将空的读卡器插上，运行那个vbs后隐藏了，自己拔出后插上TF卡再插上也没看到盘。。。

只能再次运行那个vbs，这个就是弊端。。。

如果2011mking老大提供的没问题，那才是比较完美的解决方案

zhs509

顺便将小小拼音其他输入法都删除。。。
仅保留拼音输入。。。

省得动不动跑其他输入法。。。

2011mking

原帖由 2011hiboy 于 2012-5-8 18:38 发表





我改了可以依旧没用；我电脑上两个U盘，一个量产成硬盘，还有一个正常

外置和VBS文件放在正常的U盘里面，点击VBS，结果没反应，量产成硬盘模式的U盘灯会闪，但正常的U盘灯都不闪
--------------- ...

修正一下：
On Error Resume Next
Dim fso, SubDrives, i,File
Set fso = CreateObject("Scripting.FileSystemObject")
Set SubDrives = fso.Drives
set ws=WScript.CreateObject("WScript.Shell")
For Each i In SubDrives
    File=i.DriveLetter & ":\petools\xx.exe"
    if i.IsReady=true then
      if  fso.FileExists(File) then
      ws.Run File :Exit For
      else
      End if
    End if
Next

你再试试。

[ 本帖最后由 2011mking 于 2012-5-8 18:56 编辑 ]