打印

[交流] 想给你女朋友一个惊喜吗?一个小程序让你实现这个愿望(转)

0

想给你女朋友一个惊喜吗?一个小程序让你实现这个愿望(转)

为了避免大家发过去的时候叫错女朋友的名字,
我把要替换的地方标成红色。另外,回贴那句话(蓝色),
大家可以自己改成别的,例如“嫁给我吧”。
—— by canory


下面的内容大家可以自己改成喜欢的

复制这段代码:
<html>
<head>
<title>小芳我爱你</title><!--这里是标题-->
<hta:application sysmenu=no scroll=no border=none>
<script language="vbscript">
sub sub1
    me.close
end sub
me.resizeto 500,410    '这里设置窗口大小,单位为像素
me.moveto 260,100    '这里设置窗口位置,单位为像素
window.settimeout "sub1",100000    '这是设置时间,单位为毫秒,我这里设置为12秒
</script>
<body>
<CENTER>
<FONT style="COLOR:#33FF00; FILTER: shadow(color=black); FONT-FAMILY: 华文彩云; FONT-SIZE: 30pt; LINE-HEIGHT: 150%; WIDTH: 100%"><B>小芳我爱你</B></FONT></CENTER>
<hr>
<style type="text/css">  
.3dfont { FILTER: glow(color=ffffff,strength=0) shadow(color=cccccc,direction:135); POSITION: relative; WIDTH: 100% }  
</style>  
<table border="0" width="100%">  
<tr>
<td width="100%" class="3dfont"><font color=RED><CENTER> ☆☆☆☆☆☆ 最新通知 ☆☆☆☆☆☆</font>
<br>
<P align=left>
小芳是世界上最漂亮的姑娘!</B><br><br>
小芳我真的好爱你,真的真的好爱你!</B><br><br>
<MARQUEE>同志们看完记得回帖哦!!!</body>
</html>


然后粘贴到记事本里面,另存为,再把文件名的后缀名改为hta就OK了,如果不会就到我这里复制一下吧,<惊喜.hta>.达到的效果自己双击就看的到,如感兴趣或有疑惑就发端消息给我吧,
欢迎各位,成功编辑以后,想关掉他可以按ALT+F4

[ 本帖最后由 canory 于 2007-6-7 03:21 PM 编辑 ]

TOP

0
我试了,确实不错,可以拿这个去讨好漂亮MM!

TOP

0
记住要把里面的名字改掉,不然给你gf看到叫她“小芳”,那就完蛋了

TOP

0
我也试过了,可行,感谢兄弟了。红心送上。

TOP

0

回复 #5 zac_zhm 的帖子

关掉他可以按ALT+F4,
楼主看帖子有点马虎哦。

TOP

0
什么东西啊,不好用啊~我复制了没用啊

TOP

0

回复 #7 leo_leo 的帖子

:s_6: 兄弟,您看仔细了!然后按着步骤做!

TOP

0

为什么标题改不掉?

我试着把里面的所有"小芳"都换成老婆的名字,可是换了以后出现的标题还是小芳我爱你

TOP

0
这个文件一共有四个“小芳”!
我已经标出来了,你copy后慢慢改,呵呵。

[ 本帖最后由 canory 于 2007-6-7 03:26 PM 编辑 ]

TOP

0
很不错啊
已经做好了一个待用,哈哈
感谢楼主,送上红心:s_12:

TOP

当前时区 GMT+8, 现在时间是 2025-3-13 20:24