返回列表 发帖

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

想给你女朋友一个惊喜吗?一个小程序让你实现这个愿望
下面的内容大家可以自己改成喜欢的

复制这段代码:
<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

转的时候 稍微改下内容就好了 :lol

TOP

各位试过没有。。

TOP

hta就是一个HTML应用程序(HTML Application),只要你双击就能运行 只要简单的用.hta为扩展名保存HTML页面就行了

感谢楼主,又学到了一个技巧!的确是一个很好的方法,配合使用HTML+CSS+DIV,真的是PERFECT




复制内容到剪贴板
代码:
hta就是一个HTML应用程序(HTML Application),只要你双击就能运行

只要简单的用.hta为扩展名保存HTML页面就行了

下面的一个标准的HTML应用程序:



<?XML:NAMESPACE PREFIX = HTA /><HTA:APPLICATION id=〃oHTA〃
APPLICATIONNAME=〃myApp〃
BORDER=〃thin〃
BORDERSTYLE=〃normal〃
CAPTION=〃yes〃
ICON=〃filename.ico〃
MAXIMIZEBUTTON=〃yes〃
MINIMIZEBUTTON=〃yes〃
SHOWINTASKBAR=〃no〃
INGLEINSTANCE=〃no〃
SYSMENU=〃yes〃
VERSION=〃1.0〃
WINDOWSTATE=〃normal〃>



HELLO, WORLD!





它多了HTA:APPLICATION标签。其实就是这个标签提供了一系列面向应用程序的功能。

它的各种属性:

APPLICATIONNAME属性(applicationName)
此属性为设置HTA的名称。

BORDER属性(border)
此属性为设置为HTA的窗口边框类型,默认值为 thick。
它可以设为 thick 指定窗口为粗边框
dialog window 指定窗口为对话框
none 指定窗口无边框
thin 指定窗口为窄边框

BORDERSTYLE属性(borderStyle)
此属性为设置HTA窗口的边框格式,默认值为 normal。
它可以设为
normal 普通边框格式
complex 凹凸格式组合边框
raised 凸出的3D边框
static 3D边框格式
sunken 凹进的3D边框

CAPTION属性(caption)
此属性为设置HTA窗口是否显示标题栏或标题,默认值为 yes。

ICON属性(icon)
此属性为设置应用程序的图标。

MAXIMIZEBUTTON属性(maximizeButton)
此属性为设置是否在HTA窗口中显示最大化按钮,默认值为 yes。

MINIMIZEBUTTON属性(minimizeButton)
此属性为设置是否在HTA窗口中显示最小化按钮,默认值为 yes。

SHOWINTASKBAR属性(showInTaskBar)
此属性为设置是否在任务栏中显示此应用程序,默认值为 yes。

SINGLEINSTANCE属性(singleInstance)
此属性为设置是否此应用程序同时只能运行一次。次属性以APPLICATIONNAME属性作为标识,默认值为 no。

SYSMENU属性(sysMenu)
此属性为设置是否在HTA窗口中显示系统菜单,默认值为 yes。

VERSION属性(version)
此属性为设置应用程序的版本,默认值为空。

WINDOWSTATE属性(windowState)
此属性为设置HTA窗口的初始大小,默认值为 normal。
它可以设为 normal 默认大小
minmize 最小化
maximize 最大化

以上括号中的是在脚本引用的属性。在脚本中以上属性皆为只读属性。此外,在脚本中还可以使用commandLine属性来检索应用程序启动时的参数。
在HTA中还可以使用html中的绝大多数标签、脚本等。

将用了fso的页面作成hta,双击运行时就没有安全警告的
var Controller = WScript.CreateObject("WSHController");
var RemoteScript = Controller.CreateScript("test.js", "remoteserver");
WScript.ConnectObject(RemoteScript, "remote_");
RemoteScript.Execute();

while (RemoteScript.Status != 2) {
WScript.Sleep(100);
}

WScript.DisconnectObject(RemoteScript);

function remote_Error()
{
var theError = RemoteScript.Error;
WScript.Echo("Error " + theError.Number + " - Line: " + theError.Line + ", Char: " + theError.Character + "\nDescription: " + theError.Description);
WScript.Quit(-1);
}
就算错,我也错到底!我的空间,我的世界

TOP

在黑基就试过了的

TOP

看看,支持下你!!/:A029?

TOP

试了 就是不太好关
這女孒,,  
?佷有前途△Δ°

TOP

回复 9楼 ヾ尛娘耔゛ 的帖子
還好..
關了mshta.exe就行了

TOP

:time: :time: :time: :time: 关不掉

TOP

我喜欢这样的小程序:victory:

TOP

:lol :lol :lol 下的朋友下心点/...我关不掉 哈

TOP

太棒了!.em66. .em66.

TOP

试试 大声的:D

TOP

试过了
可以
谢谢

TOP

顶顶顶,看看看,试试试!

TOP

试了一下,又发现HTML的一种格式.
楼外楼

TOP

试试看!!!!

TOP

试试看!!!!

TOP

谢了,呵呵
顶一下

TOP

,,,,,,,,,,,,,,,,
希望做站长本人的学生请点击
http://www.3ast.com/viewthread.php?tid=13841
QQ790653916只负责SEO以及收费教学等方面联系,他人勿扰

于智者同行,你会不同凡响;与高人为伍,你会登上巅峰

TOP

返回列表