标题: 局域网文件传输批处理的实现
[打印本页]
作者: lzmuhioin
时间: 2007-12-16 13:05
标题: 局域网文件传输批处理的实现
没有事做了一个小批处理文件传输的工具,希望指正或有没有更好的办法实现!!!
@echo off
mode con cols=50 lines=15
setlocal enabledelayedexpansion
title 复制脚本
set /p psw=Enter Password:
if not "%psw%" == "56697001" goto endeof
:restart
cls
set/p answer=请输入作业的路径[默认(F:\Access 2003\SS\c)]:
if "%answer%" == "" set answer=F:\Access 2003\SS\c
set/p answer1=要传输的路径[默认(Documents and Settings\Student\桌面\)]:
if "%answer1%" == "" set answer1=Documents and Settings\Student\桌面\
set/p answer2=作为IPC$连接的用户名:
if "%answer2%" == "" goto error
set/p answer3=作为IPC$连接的用户的密码:
if "%answer3%" == "" goto error
:sss
for /f "eol=; tokens=* delims=" %%i in (Computer) do (
echo 正在向%%i复制[%answer%]
net use \\%%i\ipc$ "%answer3%" /user:"%answer2%" 1>nul 2>nul
if not exist "\\%%i\c$\%answer1%\*.*" xcopy "%answer%" "\\%%i\c$\%answer1%" /e /y /c /F
net use \\%%i\ipc$ /del 1>nul 2>nul
)
set/p w1=是否还要再复制一遍[Y/N]:
if "%w1%" == "Y" set w1 = "y" else goto endeof
if "%w1%" == "y" (goto sss) else goto endeof
:error
echo.
echo.
echo 用户名或密码错误!!! & ping -n 2 127.1>nul & goto restart
点击这里下载批处理文件
[
Last edited by lzmuhioin on 2007-12-16 at 01:25 PM ]
作者: lzmuhioin
时间: 2007-12-16 13:29
自己写出这个也是为了能向两位版主讨教更好的办法!!!在这个地方让我学到了不少的东西!!!!
作者: lxmxn
时间: 2007-12-16 22:30
1、没看见“endeof”标签?
2、“if "%w1%" == "Y" set w1 = "y" else goto endeof”这句是不是错了?
作者: lzmuhioin
时间: 2008-5-6 12:58
记错了,lxmxn,把endeof 改成 eof就没有问题了,主要就是执行完命令后直接跳到批处理末端