说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB使用超链接和发送Email

HTML文档下载 WORD文档下载 PDF文档下载
VB使用超链接和发送Email

 
使用API函数ShellExecute可以调用外部默认的浏览器和电子邮件工具来打开一个超链接和和发送一个电子邮件。

    先在程序中加入如下的声明后,就能引用这个API函数:
  Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

  其中各个参数的意义如下表所示:

参数 意义
hwnd Long,指定一个窗口的句柄,有时windows程序要在创建自己的主窗口前显示一个消息框
lpOperation String,指定字串“open”来打开lpFlie文档,或指定“Print”来打印它
lpFile String,想用关联程序打印或打开一个程序名或文件名
lpParameters String,如lpszFlie是可执行文件,则这个字串包含传递给执行程序的参数
lpDirectory String,想使用的完整路径
nShowCmd Long,定义了如何显示启动程序的常数值

  比如我们要使用IE打开标签中的超链接,则我们可以在标签的Click()过程中加入如下一句代码:
  Call ShellExecute(Form1.hwnd, "open", "http://www.hongen.com", vbNullString, vbNullString, &H0)


  其中http://www.hongen.com是要打开的超链接,"open"是采用打开的方法,&H0表示用默认程序IE打开时,IE窗口可见。

  又比如我们要打开默认的电子邮件工具发送邮件,则使用下面语句:
   Call ShellExecute(Form1.hwnd, "Open", "mailto:ketang.pc@goldhuman.com", "", App.Path, 1)

  最后我们设置标签Label的字体为下划线,MouseIcon选择一个小手状的图标,把MousePointer设为99-Custom,这样就能模拟超链接的效果了。
阿里巴巴集团CTO王坚确认出席第六届中国云计算大会 【走近讲师】青云甘泉:混合云的构建及其对企业的帮助 RadiumOne创始人兼CEO因家暴被公司解雇 3D打印狂潮:可检测皮肤疾病的低价手机显微镜 浅谈导航设计,开发者必备的十大实用技巧 【云先锋 41】上海越诚:基于云服务的建站类iService软件超市 董西成:Hadoop将在高速发展和完善中扩大优势! 【走近讲师】 华云数据郁珉:公有云市场八仙过海 价格不是唯一标准! Facebook、Twitter、Google移动广告之争 开发者的黄金时代=运维人员的恶梦? 研发团队平稳度过“从小到大”并非易事 诺基亚品牌手机不久将消失 Stephen Elop回应不是木马 看七家科技公司Logo的最初模样 移动UI框架Fries:私人定制最Sexy的用户界面 必须Mark!最佳HTML5应用开发工具推荐 百度技术开放日感悟:看百度如何获取大数据时代的“船票” 谷歌亚马逊微软的烧钱游戏 拉手网CTO官冲:团购网在大数据应用上的探索 究竟谁真正关心比特币,不妨看看基于大数据的百万条推特分析 Firefox 29正式版:高度自定义模式、全新菜单和Australis UI 冼茂源:HBase在垂直搜索业务以及数据存储中的应用! 阿里云计算北京布点 全球第三个云数据中心开放 【走近讲师】友友天宇CEO姚宏宇:与行业结合是私有云厂商的重要出路 万亿移动支付产业的难点和痛点 削减硬件运营成本?亚马逊或自主研发ARM架构芯片 开源框架eMobc:XML开发原生移动应用so easy iOS应用安全开发,你不知道的那些事 市场化API的十个捷径 MongoDB和Cloudera结盟,欲征服大数据市场 红帽收购Inktank,将统一Gluster与Ceph? 那些巨头公司Logo是这么演变来的…… 为什么98下可以到2000下不行了.关于openfilename???????????????????????????? (困惑请教 )关于内存释放的一些问题! 数据库操作出错该如何避免???? 我是第一次来到CSDN,大家多关照! YYSUN关于大富翁论坛的解释(从水母看到的) vb 访问SYBASE的问题 支持北京伸奥的朋友,进来签个名吧! 怎样截获一个应用程序的消息? 数据结构得答案 大连的软件人员工作环境怎么样? 不好意思,小弟又来麻烦大家了! 上次的文章到那儿去了? enmity,进来,我给你结帐 enmity,进来,我给你结帐!! 各位侠客帮忙啊,重新装系统出了问题! 将10进制转换成16进制的函数是什么啊? VC高手,怎样以编程的方法实现磁带机的Backup 和 Restore. enmity,进来,我给你结帐.共200分 支援白菜300分,支持白菜个人网站建设:))) CMM 的缩写是什么? 想和大家讨论一下怎样系统的编制软件 如何实现和Word、CorelDRAW同样效果缩放位图 请问各位大哥大爷大妈大。。。。。。。。。。。。。哪里有支持 ASP 的服务器软件下载 我该如何控制IP地址??高手请进。。。 弱弱地问:关于SQL server中的中括号。 各位侠客帮忙啊,重新装系统出了问题!! 一点点小问题????? 请问在 WINDOWS98 下面,除了IIS,还有没有支持 PHP 的服务器软件呢? 在ADO中如何获取表名 关于ASN树的问题(snmp中的MIB的拓扑树) 你是高手你进来!!!!! 各位的顶级域名都在哪申请?价格/速度如何?大家都来说说! DirectX8的MultiFileReader过滤器怎么找不到? 关于用VB显示ado数据库中的图像字段问题 大家来谈谈Msdn如何有效利用 请各位帮忙查看我这段程序错在哪里 , 我是照书上做的 , 可就是无法保存. SQL plus 为何无法登录?? 谁要下载msdn? 紧急求救!寻找工作! 最新新消息~~~~~~~台灣地區中午地震最大震度花蓮市5級 有没有大连的公司要俺? 请教大家!!!java如何实现多重继承?接口该如何使用?份数可以再加,只要我明白了 怎样以编程的方法实现磁带机的Backup. 愿者请进,请各位留下自己的QQ或E-mail,以后大家可以多多交流!!! solaris unix8 的一个问题 asp是用什么软件的阿?我用了interdev,可是开始新建项目时就不行,叫你输入serve时,总是不对?应该输什么啊? 关于字符集 哪里有好的LAN管理软件??? 一个去美国的机会,保签(替朋友贴的,信誉没问题) 打印没有输出? 动态分配内存 用阴影在图中表示出5分之2公顷 有2公顷5个格子,怎么画? 1,1,2,3,5,8,13,21,31,55.第12个是?前一百个数中【含100个】偶数的个数有多少个、? 负三分之一加四分之一减六分之五加七分之三 怎么算 用初一的方法 图中的长方形面积表示2公顷,请用阴影部分表示出三分之二公顷 1.1+2.2+3.3+4.4+5.5+6.6分之11+22+33+44+55+66谢谢各位大哥大姐了! 六分之五减四分之一加三分之一怎么算 在图中用阴影表示出5分之2公顷 15°15′15″+55°14′35″-32°28′19″=? 7又六分之五加负五又三分之一加2又四分之一加负四又四分之三 在图中用阴影表示出7/12公顷.急 77度45分+34度45分=___度____分 求(1+1/2+1/2+1/4+1/5)*1-(1+1/2+1/3+1/4)的计算过程. 有一块3公顷的地,把它分成7份,用阴影表示出7分之9公顷,该画多少份, 34度42分=多少度 3/5-(1/2-1/4)计算, 七分之三表示吧【 】平均分成【 】份,取这样的【 】份,它的分数单位是【 】,再加上【 】个这样的分数单位就是3. 45*46等于多少? 2又4/5*[1/(3又1/3-2.4)] 计算 7分之4乘3表示什么?,还可以表示为什么? 45*2等于多少 计算:(1)3.5÷(-2分之7)×/-2分之1/ 3×7分之3表示(),3÷7分之3表示( ) 2+45等于几 (2.5+3/4)÷1/8列式计算, 谷歌地球飞行模拟器刚飞起来就各种几千度的旋转,然后空中一上一下,时速从200-800不等,高度从3000-9000不等,来回转啊转,然后就坠毁了……这东西到底怎么用啊……求解 7.5+4分之3= 2.45约等于几一直约下去,得几? 谷歌地球飞行模拟器出错每次一打开飞行模拟器,就出现这样的对话框,仔细看一下文件路径(划红线的部分)文件夹下边的子文件夹用“/”分隔,划红线的路径为什么用“\”分隔?谷歌地球抽 a分之4+a分之5=7分之3,那么a是( ). 5分之2*45等于多少 谷歌地球飞行模拟器怎么用操纵杆我的上面没办法打勾,怎么补救 七分之三可以表示,还可以表示什么 45-多少+13等于28 35*(3/35-2/53)*53简便计算过程 x+7分之6=2+14分之1怎么解? 180°-23°13′6〃*4等于几 将0.75,0.25,0.125,0.375,0.625,0.875化成最简分数 5分之7-X=14分之3 角1是36度,求角2 1+2+3+4.+99等于多少 x+7分之8=x-2分之2怎么解 计算3分之一加四分之一时 3分支4-(-7分之8)-2-(+3分支1)-7分支1 x:5分之7=8分之7解比例要求全过程. -3又3分之1-2又四分之一-(-2又三分之一)+(-4又四分之一) 怎么算 2002/1×3+2002/3×5+2002/5×7+2002/7×9+2002/9×11 简便计算 3.5:7分之8=x:5分之2(解比例只要答案) 计算:(-四分之一)^5*(四分之一)^3*(-四分之一)^2(a^2)^3*a*(a^4)^2 3(a^3)^4+a^9*a^3-2(a^2)^6 (-2a^2)^3-(-3a^3)^2 10^m-1*10^n-1*10^3 (x^2y^3)^3+(-2x^3y^2)^2*y^5 (四分之一)^2006*2^4010 (-3a)^3-(-a)*(-3a)^2 1—2—3+4+5—6—7+8+9—10—11…+2001—2002—2003 求简便运算过程1—2—3+4+5—6—7+8+9—10—11…+2001—2002—2003 求简便运算过程 求快速. 急!0.75-2又4分之3-0.125+12又7分之5-48分之1+|6又7分之5-10|要过程~~~~ 修一条路,前3天修了这条路的四分之一,平均每天修了这条路的几分之几?照这样计算,修往这条路,需要几天. 2002/1×3+2002/3×5+2002/5×7+2002/7×9+2002/9×11简便计算 下面的分数请化成最简分数;75分之12、65分之15、130分之80、30分之25、55分之33、48分之32、75分之125还有63分之117 (-3又四分之一)+(-1又十二分之一) 7分之四乘3分之2加7分之4 [2-(5.55×1又3分之1-2又10分之7)]÷0.9 负三又四分之一加负一又十二分之一= 负三又四分之一加负一又十二分之一=几 4分之3乘( )=( )乘8分之7=( )+7分之4=( )-2分之1=1 观察:1+2+3+4+5+6+7+8+9+10=(1+10)*(10÷2 )=11*5=55计算:1992/1993+1991/1993+1990/1993+...+3/1993+2/1993+1/1993=?/:分数线 分子/分母 四分之一里有几个十二分之一?一又四分之一里有几个二十四分之一?
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn