中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-06 05:01

共 48,039 主题排行 / 350,124 发帖 / 今日 2 篇 / 48,251 会员排行

DOS批处理 & 脚本技术（批处理室） » 程序员，如何对心仪的MM示爱

可打印版本　3,473 / 35

第16楼　zh159	发表于 2007-04-25 05:13
金牌会员　发帖 1,467　积分 3,687
用批处理就可以了 ::zh159@bbs.cn-dos.net ::“%”字符需要“%%”处理，“\|”字符作为换行字符。 ::“"”、“:”字符不能处理。 @echo off title XX 对 XX 的表白 mode con cols=60 lines=15 color fc set "str= ~!@#$%%^&*()_+{}<>?测试，\|测试测试测试测试\|测试测试测试！" >sleep.vbs echo wscript.sleep 100 set N=0 echo. :loop sleep.vbs call set "var=%%str:~%N%,1%%" if "%var%" == "" goto end if "%var%" == "\|" set var= &echo. set /p"=%var%"<nul set /a N+=1 goto loop :end del sleep.vbs echo. echo. pause

第17楼　jmz573515	发表于 2007-04-25 09:41
银牌会员　发帖 464　积分 1,212
好！可惜对批一点也不懂~~。。。

第18楼　teelin	发表于 2007-04-25 10:10
新手上路　发帖 2　积分 6
学习学习一下

第19楼　feng8103	发表于 2007-04-26 09:00
新手上路　发帖 3　积分 5
很有意思的vbs学习

第20楼　qcqtye	发表于 2007-04-26 10:32
初级用户　发帖 14　积分 26
哈哈.在QQ聊天窗口也可以输入啊!!

第21楼　moto88	发表于 2007-05-04 22:37
新手上路　发帖 11　积分 4
好看

第22楼　sonicandy	发表于 2007-05-07 20:05
中级用户　发帖 91　积分 273
Set ie = CreateObject("InternetExplorer.Application") '设置ie对象 ie.Navigate "about:blank" ie.fullscreen=true ie.Width = 270 ie.Height = 50 ie.left=fix((ie.document.parentwindow.screen.availwidth-ie.width)/2) '水平居中' ie.top=fix((ie.document.parentwindow.screen.availheight-ie.height)/2) '垂直居中' ie.Visible = True str = "Sorry girl: I think I...don't love you" Num = len(str) ie.document.write "<body scroll=no><b><span id=show></span></b></body>" for i = 1 to Num Input = Left(str, i) ie.Document.all.show.innerhtml = Input wscript.sleep 500 Next wscript.sleep 10000 ie.quit set ie = nothing [ Last edited by sonicandy on 2007-5-7 at 09:22 PM ]

第23楼　qweqweqwe	发表于 2007-05-08 08:24
贫困用户　发帖 1　积分 -2
123213123123 12312312sdfdsfs ───────────────────　版务记录　──────────────────── 执行：lxmxn 操作：恶意灌水，扣除2点积分。 ───────────────────　版务记录　──────────────────── [ Last edited by lxmxn on 2007-5-8 at 09:01 AM ]

第24楼　cuizht	发表于 2007-05-10 17:15
新手上路　发帖 6　积分 15
嘿嘿..有意思..好玩嘛~

第25楼　zhjipt	发表于 2007-05-10 18:40
初级用户　发帖 16　积分 40
:D:D真是历害呀

第26楼　Vampire	发表于 2007-06-16 23:53
初级用户　发帖 78　积分 176
打汉字可以直接调编码字符，然后在输入前调用CTRL+SHIFT按键，但这个性设置依赖太强，22楼代码收藏。。。

第27楼　xue0808	发表于 2007-06-19 23:26
初级用户　发帖 56　积分 108
22楼太有才了

第28楼　online365	发表于 2007-06-20 01:12
初级用户　发帖 75　积分 182
22楼的厉害.有花样.呵呵 .

第29楼　waz	发表于 2007-06-20 09:28
新手上路　发帖 3　积分 5
问下,如何在QQ聊天窗口输入??????

第30楼　313885174	发表于 2007-10-11 16:40
中级用户　发帖 100　积分 206
呵呵

上一页　 1 2 3 　下一页

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023