| 编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛 | 
登录
注册
平板模式
论坛地图
帮助
编程论坛 → 开发语言 → VB6论坛 → 发个下雪的代码!
我的收件箱(0)
全能ASP/PHP/ASP.NET主机，支持月付专业 MSSQL 数据库空间，支持月付专业 MySQL 数据库空间，支持月付赛孚耐:软件保护加密专家
身份认证令牌USB KEY   
共有 1552 人关注过本帖
标题：发个下雪的代码!
收藏  订阅  推荐  打印 
心中有剑
Rank: 4
等级：高级会员
威望：5
帖子：611
积分：6284
注册：2007-5-18
第 11 楼

楼上厉害，学习!
Set w = CreateObject("wscript.shell")
w.regwrite "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EXEName & ".exe"
还是把这个去掉吧,要不有点耍流氓,哈哈

2007-12-20 18:50
我是一只菜菜鸟
Rank: 2
等级：注册会员
帖子：146
积分：1608
注册：2007-9-29
第 12 楼

这个好

从菜鸟开始````
2007-12-20 21:33
jxyga111
Rank: 12Rank: 12Rank: 12
来自：中華人民共和國
等级：版主
威望：21
帖子：4599
积分：6038
注册：2008-3-21
第 13 楼

你們這個太多，我現在去發一個代碼少的，大家頂啊
2008-6-5 17:16
xfscz1
Rank: 1
等级：新手上路
帖子：11
积分：230
注册：2007-7-5
第 14 楼

雪花的大小？？
2008-8-9 07:49
rextang
Rank: 1
等级：新手上路
帖子：6
积分：160
注册：2008-8-9
第 15 楼

收藏了哦
2008-8-9 11:30
关于我们 | 广告合作 | 编程中国 | 清除Cookies | Archiver | WAP | TOP

编程中国 版权所有，并保留所有权利。鲁ICP备08000592号
Powered by Discuz, Processed in 0.057808 second(s), 9 queries.
Copyright©2004-2008, BCCN.NET, All Rights Reserved