这是针对oracle编写的，可以用在不同的电脑上，因为它会自动读取当前电脑的环境变量，从而取得oracle的安装路径，唯一有一点不足的地方是程序中运行过程中会产生一个中间文本文件，不过这并不碍大事，备份或者还原完了以后将会自动删除产生文本文件，代码如下：
复制代码 代码如下:
@echo off&setlocal enabledelayedexpansion
color 0a
:start
for /f "tokens=2 delims==" %%a in ('path') do (
set "str=%%a"
set str=!str: =+!
for %%i in (!str!) do (
set "var=%%i"
set var=!var:+= !
echo !var!change.txt
for /f "delims=" %%i in ('findstr "oracle" change.txt') do set var=%%i
)
)
set /p choice=1.备份 2.还原 3.按任意键退出：
if %choice%==1 goto exp
if %choice%==2 goto imp
:exp
del /q change.txt
set /p file=请输入备件数据库的文件名：
set /p path=请输入存放的路径(记得输冒号:)：
"%var%"\exp.exe smhr/smhr file=%path%\%file% full=n
set /p choice=1.继续 2.按任意键退出：
if %choice%==1 goto start
:imp
del /q change.txt
set /p file=请将要导入的数据库文件拖入窗体内：
"%var%"\imp.exe smhr/smhr file=%file% full=y
set /p choice=1.继续 2.按任意键退出：
if %choice%==1 goto start
复制代码 代码如下:
@echo off&setlocal enabledelayedexpansion
color 0a
:start
for /f "tokens=2 delims==" %%a in ('path') do (
set "str=%%a"
set str=!str: =+!
for %%i in (!str!) do (
set "var=%%i"
set var=!var:+= !
echo !var!change.txt
for /f "delims=" %%i in ('findstr "oracle" change.txt') do set var=%%i
)
)
set /p choice=1.备份 2.还原 3.按任意键退出：
if %choice%==1 goto exp
if %choice%==2 goto imp
:exp
del /q change.txt
set /p file=请输入备件数据库的文件名：
set /p path=请输入存放的路径(记得输冒号:)：
"%var%"\exp.exe smhr/smhr file=%path%\%file% full=n
set /p choice=1.继续 2.按任意键退出：
if %choice%==1 goto start
:imp
del /q change.txt
set /p file=请将要导入的数据库文件拖入窗体内：
"%var%"\imp.exe smhr/smhr file=%file% full=y
set /p choice=1.继续 2.按任意键退出：
if %choice%==1 goto start