标题: JAVA程序助手
[打印本页]
作者: yaohaixu
时间: 2008-4-15 19:52
标题: JAVA程序助手
这个是我在学JAVA 的时候,写的。
也 不是很好, 有些功能就没能更好地实现,
相对地来说要方便一些
@echo off
setlocal enabledelayedexpansion
title JAVA程序助手HJI
mode con:cols=80 lines=25
color 5f
:start
cls
echo set wshshell=wscript.createobject("wscript.shell"

>hji.vbs
echo wscript.sleep 500 >>hji.vbs
echo wshshell.sendkeys "+{PGUP}" >>hji.vbs
echo wscript.sleep 500 >>hji.vbs
echo wshshell.sendkeys "HJI

lease edit your file." >>hji.vbs
echo wscript.sleep 1200 >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
echo wshshell.sendkeys "{BACKSPACE}" >>hji.vbs
start notepad.exe
call hji.vbs
ping -2 127.0.0.1>nul
@del /s /q hji.vbs
cls
echo. %date% %time%
echo. **********************************
echo. JAVA程序助手
echo.
echo. ¤请将JAVA源程序文件拖动到¤
echo. ¤此窗口中¤
echo.
echo. H-JI如枫
echo. **********************************
echo. 按ENTER键退出 QQ:116386459
echo.
set /p fin=
for %%a in (%fin%) do (
set hji=%%a
)
if "!hji!" equ "" exit
for %%b in (%fin%) do (
set fname=%%~n%b
)
javac !fname!.java
java !fname!
echo.
echo. **********按任意键退出***********
pause>nul
exit
goto start
作者: happysoul
时间: 2008-4-16 18:51
貌似不能使用呢!?提示 vb的 53行 少 )
但是我没有找到!
再有就是用 记事本做什么?