|
|
马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
帮忙看下，下面是代码！自己的电脑能注册，能用，为什么到别的电脑就插件注册失败，为什么呢？帮忙看下，感激不尽！！！！
帮忙看下，下面是代码！自己的电脑能注册，能用，为什么到别的电脑就插件注册失败，为什么呢？帮忙看下，感激不尽！！！！
帮忙看下，下面是代码！自己的电脑能注册，能用，为什么到别的电脑就插件注册失败，为什么呢？帮忙看下，感激不尽！！！！
空间 小助手
//默认空间
abc=com("Ms.Email")
//退出按钮_点击操作
功能 退出_点击()
辅助.退出()
功能结束
功能 按钮0_点击()
//这里添加你要执行的代码
邮件0=编辑框.获得文本("编辑框0")
邮件1=编辑框.获得文本("编辑框1")
邮件2=编辑框.获得文本("编辑框2")
邮件3=编辑框.获得文本("编辑框3")
邮件4=编辑框.获得文本("编辑框4")
附件=浏览框.获得("浏览框0")
如果(邮件0=="")
辅助.消息框("邮箱不能为空!请认真填写!","提示")
返回 1
如果结束
如果(邮件1=="")
辅助.消息框("密码不能为空!请认真填写!","提示")
返回 1
如果结束
如果(邮件3=="")
辅助.消息框("单位名称不能为空!请认真填写!","提示")
返回 1
如果结束
如果(邮件4=="")
辅助.消息框("内容不能为空,请认真填写!","提示")
返回 1
如果结束
控件.可见("标签18",真)
控件.可见("标签19",真)
控件.可见("进度条0",真)
进度条.设置进度("进度条0",10)
辅助.等待(300)
进度条.设置进度("进度条0",20)
辅助.等待(300)
进度条.设置进度("进度条0",30)
辅助.等待(300)
进度条.设置进度("进度条0",40)
辅助.等待(300)
进度条.设置进度("进度条0",50)
辅助.等待(300)
进度条.设置进度("进度条0",60)
辅助.等待(300)
进度条.设置进度("进度条0",70)
//用邮箱之前,需要在邮箱里面开启SMTP服务. 网易邮箱是默认开启的,腾讯就需要开启,如果不知道怎么开启问度娘
abc.SendEmail(邮件0,邮件1,邮件2,邮件3,邮件4,附件)//最后一个参数如果没有附件,就填 ""
//-----------(发件人,密码,收件人,标题,内容,附件)这是顺序.
//再次重申别给我的邮箱发邮件
辅助.等待(300)
进度条.设置进度("进度条0",80)
辅助.等待(300)
进度条.设置进度("进度条0",90)
辅助.等待(300)
进度条.设置进度("进度条0",99)
控件.可见("进度条0",假)
控件.可见("标签18",假)
控件.可见("标签19",假)
辅助.消息框("发送成功!","发送信息")
返回 真
功能结束
功能 按钮1_点击()
//这里添加你要执行的代码
辅助.消息框("附件要求:\n\n1、请勿上传大文件(5MB以内);\n\n2、只支持单个文件上传;\n\n3、对附件提出建议,请联系我们!","提示")
功能结束
功能 按钮2_点击()
//这里添加你要执行的代码
辅助.命令("rc:如何开启QQ邮箱的SMTP服务.doc",真)
功能结束
功能 初始化()
//这里添加你要执行的代码
控件.可见("进度条0",假)
控件.可见("标签18",假)
控件.可见("标签19",假)
编辑框.设置文本("编辑框5","主要经营:\r\n喷绘广告 户内外写真 机印条幅 大型雕刻 亚克力吸塑字 PVC字 水晶字 弗龙板字 电子显示屏 灯箱 广告牌 灯箱 各种奖牌 铜字铜牌 电脑刻章 制度版面 科室门牌 锦旗 彩色复印（打印） 收发传真 网络打印 复印打字 鸟瞰图 施工图 效果图 宣传彩页 企业画册 名片 人像证卡 包装 商标 CI VI 模型 不干胶 字画装裱 联单 霓虹灯……等等,更多业务,进店咨询!")
功能结束
//消息路由功能
功能 小助手_消息路由(句柄,消息,w参数,l参数,时间,x坐标,y坐标)
WM_KEYDOWN=256//按下一个键
WM_KEYUP=257//释放一个键
VK_TAB=9//TAB
max=5//控件的数量
控件名="编辑框"
if(消息==WM_KEYDOWN&&w参数==VK_TAB)
for(i=0;i<max;i++)
if(句柄==control.gethandle(控件名&i))
window.setfocus(control.gethandle(控件名&(i+1)))
if(i==(max-1))
window.setfocus(control.gethandle(控件名&"0"))
endif
返回 真
endif
endfor
endif
返回 假
返回 假
功能结束
//点击关闭_执行操作
功能 小助手_关闭()
辅助.消息框("如果您对本软件有什么建议和看法,请联系及时联系我们!","尊敬的客户您好:")
辅助.退出()
功能结束
功能 按钮3_点击()
//这里添加你要执行的代码
文件.拷贝("rc:Ms.dll","C:\\WINDOWS\\system32\\Ms.dll")
是否成功=辅助.注册插件("rc:ms.dll",真)
// 真 表示注册成功 反之假表示注册失败
如果(是否成功)
辅助.消息框("插件注册成功!","提示")
否则
辅助.消息框("插件注册失败!","提示")
如果结束
功能结束
空间结束
//空间结束语句
帮忙看下，下面是代码！自己的电脑能注册，能用，为什么到别的电脑就插件注册失败，为什么呢？帮忙看下，感激不尽！！！！
帮忙看下，下面是代码！自己的电脑能注册，能用，为什么到别的电脑就插件注册失败，为什么呢？帮忙看下，感激不尽！！！！
这是一个发邮件的插件，想叫别人用这个软件发邮件给自己的，为什么别的电脑插件注册失败！！！！求解
|
|
/2 
发表于 2013-9-24 19:11:00
楼主
