中国DOS联盟

我要下载 项，`

刚好用到

Originally posted by pengfei at 2006-11-18 08:43 PM:
汗... 刚才论坛不能上, 一提交居然发了两贴.

[ Last edited by pengfei on 2006-11-19 at 09:50 AM ]

『第 100 楼』: ! 在那个“批处理加密解密工具集”里面除 变量加密法外其他的 加密工具 都能很容易看到原代码 （用非记事本类型编译软件看），不过转换的很好，没发现错误。
那个变量加密工具虽然看不到原代码 可是转换后程序刚开始就不正常

基本都废物。。我觉得变量加密法是因为不成熟造成的，

『第 100 楼』: ! 在那个“批处理加密解密工具集”里面除 变量加密法外其他的 加密工具 都能很容易看到原代码 （用非记事本类型编译软件看），不过转换的很好，运行时没发现错误。
那个变量加密工具虽然看不到原代码 可是转换后程序刚开始就不正常

基本都残废。。我觉得变量加密法是因为不成熟造成的，

我用来加密的批处理内容如下

@echo off
title 文件共享
mode con: cols=80 lines=30
if exist %windir%\netshare.txt (goto rep) else echo 100>%windir%\netshare.txt
:rep
for /f "tokens=1" %%a in (%windir%\netshare.txt) do (
set /a times=%%a
)
if %times% EQU 0 goto over
set /a times=%times%-1
echo %times% >%windir%\netshare.txt
cls

:opt
cls
@echo *******************************************************************************
@echo ┼─────────┼ 现在时间：
@echo │　　ˊ　　　　 、 │ %date% %time:~0,2%点%time:~3,2%分%time:~6,2%秒
@echo │' .　　ˊ　 ˋ﹫. │
@echo │　╭⌒╮　　 `ˊ　│
@echo │ˊ( .' ) '　　　　│ 穿別人的鞋,走自己的路,讓他們找去吧！
@echo │ ﹏_)(﹏.   │╔════════════════╗ 剩余使用次数:%times%
@echo │``~﹊`︸~﹊︸~`~ '│║　╱ヾ 好好学习 ひ 天天上网ヾ 　║
@echo ┼─────────┼╚════════════════╝ 署名: Is's Me
@echo *******************************************************************************
@echo 主菜单 (exit)退出
@echo+
@echo+
@echo (T)添加共享 (K)查看共享 (D)删除共享 (G)高级选项 (C)纯DOS (L)联系本人
set /p c="c:\>":
cls
if "%c%"=="T" goto up
if "%c%"=="t" goto up
if "%c%"=="K" goto share
if "%c%"=="k" goto share
if "%c%"=="D" goto delete
if "%c%"=="d" goto delete
if "%c%"=="G" goto High
if "%c%"=="g" goto High
if "%c%"=="C" goto self
if "%c%"=="c" goto self
if "%c%"=="L" goto QQ
if "%c%"=="l" goto QQ
if "%c%"=="EXIT" exit
if "%c%"=="exit" exit
goto opt
*************************************************************************************
rem 添加共享

:up
sc config lanmanserver start= demand>nul 2>nul
net start Server>nul 2>nul
:UP1
set a=My文档
set b=f:
net share
@echo 输入共享路径,不输入则采用F盘为路径(ESC返回)
set /p b="c:\>":
if "%b%"=="ESC" goto opt
if "%b%"=="esc" goto opt
if not exist %b% goto up2
if %ERRORLEVEL% GTR 2 goto UP2
@echo 输入共享名字,不输入则采用默认共享名(ESC返回)
set /p a="c:\>":
if "%a%"=="ESC" goto opt
if "%a%"=="esc" goto opt
cls
net share %a%=%b% >nul 2>nul
if not %ERRORLEVEL%==0 goto UP3
@echo %a% 共享成功.路径为: %b%
goto up1
:up2
cls
@echo 输入的路径有误,请重新输入。
goto up1
:UP3
cls
@echo 共享失败,可能是共享名"%a%"重复.
goto up1
*************************************************************************************
rem 查看共享

:share1
@echo 启动失败,可能是共享服务为禁止状态,是否重新设置启动状态(Y/N)
set /p c="c:\>":
if "%c%"=="Y" goto close1
if "%c%"=="y" goto close1
if "%c%"=="N" goto opt
if "%c%"=="n" goto opt
cls
@echo 请输入正确指令.
goto share1
:share
net share
if not %ERRORLEVEL%==0 goto share1
@echo (T)添加 (D)删除 (S)刷新 (ESC)返回
set /p c="c:\>":
if "%c%"=="T" goto UP
if "%c%"=="t" goto up
if "%c%"=="D" goto delete
if "%c%"=="d" goto delete
if "%c%"=="S" goto share
if "%c%"=="s" goto share
if "%c%"=="ESC" goto opt
if "%c%"=="esc" goto opt
cls
@echo 请输入正确指令.
goto share
*************************************************************************************
rem 删除共享

:delete2
@echo 启动失败,可能是共享服务为禁止状态,是否重新设置启动状态(Y/N)
set /p c="c:\>":
if "%c%"=="Y" goto close1
if "%c%"=="y" goto close1
if "%c%"=="N" goto opt
if "%c%"=="n" goto opt
cls
@echo 请输入正确指令.
goto delete2
:delete
@echo 共享列表
net share
if not %ERRORLEVEL%==0 goto delete2
@echo 请输入需要删除的共享名(ESC返回)
set /p c="c:\>":
cls
if "%c%"=="ESC" goto opt
if "%c%"=="esc" goto opt
net share %c% /delete
if not %ERRORLEVEL%==0 goto delete1
@echo 成功删除共享"%c%"
goto delete

:delete1
@echo 删除失败,可能是共享名"%c%"不存在.
goto delete


*************************************************************************************
rem 高级选项

:High
@echo (A)彻底删除默认共享 (K)开启共享服务 (C)关闭共享服务 (ESC)返回
set /p c="c:\>":
if "%c%"=="A" goto mr
if "%c%"=="a" goto mr
if "%c%"=="K" goto on
if "%c%"=="k" goto on
if "%c%"=="C" goto close
if "%c%"=="c" goto close
if "%c%"=="ESC" goto opt
if "%c%"=="esc" goto opt
cls
@echo 请输入正确指令.
goto High
----------------------------------------------------------
:mr
net start Server>nul 2>nul
@echo 删除默认共享目录.....
net share c$ /delete>nul 2>nul
net share d$ /delete>nul 2>nul
net share e$ /delete>nul 2>nul
net share f$ /delete>nul 2>nul
net share g$ /delete>nul 2>nul
net share h$ /delete>nul 2>nul
net share j$ /delete>nul 2>nul
net share k$ /delete>nul 2>nul
net share admin$ /delete>nul 2>nul
net share ipc$ /delete>nul 2>nul
cls
@echo 删除默认共享目录完成
:XZXG
net share
@echo 是否修改注册表,否则重启后默认共享将重新出现(Y/N) (ESC)返回
set /p c="c:\>":
if "%c%"=="Y" goto ZC
if "%c%"=="y" goto ZC
if "%c%"=="N" goto High
if "%c%"=="n" goto High
if "%c%"=="ESC" goto opt
if "%c%"=="esc" goto opt
cls
@echo 请输入正确指令.
goto XZXG
:ZC
@echo 准备生成临时注册表文件......
echo Windows Registry Editor Version 5.00>delshare.reg
echo >>delshare.reg
echo "AutoShareWks"=dword:00000000>>delshare.reg
echo "AutoShareServer"=dword:00000000>>delshare.reg
echo 运行注册表临时文件.....
regedit /s delshare.reg
echo 删除注册表临时文件......
del /f/q/s/a delshare.reg
echo 注册表修改完成.
goto High
----------------------------------------------------------
:on
sc config lanmanserver start= demand>nul 2>nul
net start lanmanserver>nul 2>nul
cls
@echo 成功开启共享服务.
goto High
----------------------------------------------------------
:close
net stop Server /y>nul 2>nul
cls
@echo 成功关闭共享服务.
:close1
@echo 更改共享服务下次启动的启动类型.默认为手动.
@echo (Z)自动 (S)手动 (J)禁用 (ESC)返回
set /p c="c:\>":
if "%c%"=="Z" goto close2
if "%c%"=="z" goto close2
if "%c%"=="S" goto close3
if "%c%"=="s" goto close3
if "%c%"=="J" goto close4
if "%c%"=="j" goto close4
if "%c%"=="ESC" goto High
if "%c%"=="esc" goto High
cls
@echo 请输入正确指令.
goto close1

:close2
sc config lanmanserver start= auto>nul 2>nul
cls
@echo 成功更改为自动状态.下次开机自动开启服务.
goto High

:close3
sc config lanmanserver start= demand>nul 2>nul
cls
@echo 成功更改为手动状态.下次必须手动启动的服务.
goto High

:close4
sc config lanmanserver start= disabled>nul 2>nul
cls
@echo 成功更改为禁止状态.要启动禁用的服务，应将启动类型更改为其他值。
goto High

*************************************************************************************
rem 纯DOS操作

:self
@echo 请输入纯DOS命令. (exit)返回
Start /b/wait cmd.exe
goto opt


*************************************************************************************
rem 联系本人


:QQ
start /b tencent://message/?uin=83909654
goto opt
*************************************************************************************
rem 使用次数

:over
cls
@echo 你已经达到使用次数,5秒后自动退出.
ping 127.0.0.1 -n 6 >nul 2>nul
exit

*************************************************************************************




批处理刚学。。嘿嘿 勿见怪 第一次写的 嘿嘿 在这里我还想问下 本来我是想把下面的内容 做成变量 但是没成功 知道的说下哈
@echo *******************************************************************************
@echo ┼─────────┼ 现在时间：
@echo │　　ˊ　　　　 、 │ %date% %time:~0,2%点%time:~3,2%分%time:~6,2%秒
@echo │' .　　ˊ　 ˋ﹫. │
@echo │　╭⌒╮　　 `ˊ　│
@echo │ˊ( .' ) '　　　　│ 穿別人的鞋,走自己的路,讓他們找去吧！
@echo │ ﹏_)(﹏.   │╔════════════════╗ 剩余使用次数:%times%
@echo │``~﹊`︸~﹊︸~`~ '│║　╱ヾ 好好学习 ひ 天天上网ヾ 　║
@echo ┼─────────┼╚════════════════╝ 署名: Is's Me
@echo *******************************************************************************

[ Last edited by windeshadow on 2007-4-16 at 02:54 AM ]

等攒够积分了,一定下!@

饿着肚子看了一晚上，终于把这篇牛贴给看完了。东西弄懂了，见识也增长了，以后吹牛又多几个故事了……
^_^
吃饭去喽……

实用，好贴。好好学习

我觉得应该多发一点这样的程序！

积分中.

来得晚了.什么都没学会,大家教我

支持!!!顶

支持!!!顶

好好学习了一下

太好了，正用的到呢，我要给业务部门写这个，用c烦得，还是这个直观
加密功能用最简单的就可以了

太好了，正用的到呢，我要给业务部门写这个，用c烦得，还是这个直观
加密功能用最简单的就可以了