帮我加一个开机运行啊~~~~~~

等到 · 发表于 2012-2-1 17:30:01

.版本 2
.支持库 eAPI
.程序集窗口程序集1
.子程序 __启动窗口_创建完毕
隐藏任务栏 ()
隐藏桌面图标 ()
隐藏系统时钟 ()
隐藏开始按钮 ()

.子程序 _按钮1_被单击
.如果 (编辑框1.内容 ≠ “801256”)
信息框 (“密码输入错误，请重新输入”, 0, )
.否则
.如果结束
.判断开始 (编辑框1.内容＝ “801256”)
显示任务栏 ()
显示桌面图标 ()
显示系统时钟 ()
显示开始按钮 ()
.默认
.判断结束
结束 ()

补充内容 (2012-2-1 17:34):
或者帮忙做一个开机需要密码的程序的源码一样给分~~

怪伱过分羙丽 · 发表于 2012-2-1 17:30:02

写0或者1都可以啊。都是开机自动运行，你把代码直接复制到你程序启动窗口创建完毕下面。
然后把程序编译出来，然后运行一次，再重启就知道了

素顏じ亦傾城ジ · 发表于 2012-2-1 17:35:43

这个... 你试试把开头地址的软件地址改下能不能用

怪伱过分羙丽 · 发表于 2012-2-1 17:38:32

晕了。。
在启动窗口创建完毕下面添加这个代码。
[e]设置自动运行 (“随便写吧.exe”, 取运行目录 () ＋ “\” ＋取执行文件名 (), 1)[/e]
最后一个参数1可以写0。1是写到启动组，就是开始程序启动里面 0是写到注册表。
杀毒软件会拦截的。

等到 · 发表于 2012-2-1 17:40:49

拒绝再玩发表于 2012-2-1 17:38
晕了。。
在启动窗口创建完毕下面添加这个代码。

就是一开机就运行写到1 还是0？

等到 · 发表于 2012-2-1 17:42:37

℡愛國々飯團发表于 2012-2-1 17:35
这个... 你试试把开头地址的软件地址改下能不能用

哎呀我的吗呀  斑竹帅哥  我是一菜鸟你懂这个东西我砸看得懂呢~~.版本 2

.程序集窗口程序集1

.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击

输出调试文本 (设置开机自动运行 (“D:\Program Files\e\e.exe”, , “易语言编程”))
输出调试文本 (删除启动项 (“易语言编程”))

.子程序设置开机自动运行, 整数型, , 返回正为成功,返回零为设置过,无须再设置,返回负为失败
.参数可执行文件名, 文本型, , 带全路径的可执行文件名
.参数运行参数, 文本型, 可空
.参数启动项名称, 文本型
.局部变量函数返回值, 整数型
.局部变量注册表句柄, 整数型
.局部变量类型, 整数型
.局部变量启动项项值, 文本型
.局部变量缓冲文本, 文本型
.局部变量缓冲数值, 整数型

.如果 (是否为空 (运行参数) ＝真)
启动项项值＝字符 (34) ＋删首尾空 (可执行文件名) ＋字符 (34)
.否则
启动项项值＝字符 (34) ＋删首尾空 (可执行文件名) ＋字符 (34) ＋ “ ” ＋删首尾空 (运行参数)
.如果结束

函数返回值＝打开注册表项_ (-2147483646, “Software\Microsoft\Windows\CurrentVersion\Run”, 注册表句柄)
.如果 (函数返回值＝ 0)  ' 打开注册表成功
缓冲文本＝取空白文本 (256)
缓冲数值＝ 256
函数返回值＝读注册表项值_ (注册表句柄, 启动项名称, 0, 类型, 缓冲文本, 缓冲数值)
.如果 (函数返回值＝ 0)  ' 读取注册表成功
      .如果 (缓冲文本 ≠ 字符 (0))  ' 注册表项有键值,设置过自动运行
         .如果 (取文本左边 (缓冲文本, 缓冲数值－ 1) ≠ 启动项项值)  ' 项值已变,须重新设置
            函数返回值＝设置注册表项值_ (注册表句柄, 启动项名称, 0, 1, 启动项项值, 取文本长度 (启动项项值))
            .如果 (函数返回值＝ 0)  ' 重新设置自动运行成功
                  关闭注册表项_ (注册表句柄)
                  返回 (2)
            .否则
                  关闭注册表项_ (注册表句柄)  ' 重新设置自动运行失败
                  返回 (-1)
            .如果结束

         .否则
            ' 项值没变,无须再次设置
            关闭注册表项_ (注册表句柄)
            返回 (0)
         .如果结束

      .否则
         ' 注册表项无键值,尝试重新设置
         函数返回值＝设置注册表项值_ (注册表句柄, 启动项名称, 0, 1, 启动项项值, 取文本长度 (启动项项值))
         .如果 (函数返回值＝ 0)  ' 重新设置自动运行成功
            关闭注册表项_ (注册表句柄)
            返回 (3)
         .否则
            关闭注册表项_ (注册表句柄)  ' 重新设置自动运行失败
            返回 (-2)
         .如果结束

      .如果结束

.否则
      ' 读取注册表失败,可能没有设置过自动运行
      函数返回值＝设置注册表项值_ (注册表句柄, 启动项名称, 0, 1, 启动项项值, 取文本长度 (启动项项值))
      .如果 (函数返回值＝ 0)  ' 设置自动运行成功
         关闭注册表项_ (注册表句柄)
         返回 (1)
      .否则
         关闭注册表项_ (注册表句柄)  ' 设置自动运行失败
         返回 (-1)
      .如果结束

.如果结束

.否则
返回 (-3)  ' 打开注册表失败
.如果结束

.子程序删除启动项, 整数型, , 删除成功返回0,失败返回负数
.参数启动项名, 文本型
.局部变量函数返回值, 整数型
.局部变量注册表句柄, 整数型

函数返回值＝打开注册表项_ (-2147483646, “Software\Microsoft\Windows\CurrentVersion\Run”, 注册表句柄)
.如果 (函数返回值＝ 0)
函数返回值＝删除注册表项_ (注册表句柄, 启动项名)
.如果 (函数返回值＝ 0)
      关闭注册表项_ (注册表句柄)
      返回 (0)
.否则
      关闭注册表项_ (注册表句柄)
      返回 (-1)
.如果结束

.否则
返回 (-2)