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

VB利用 API 可以直接拨号

HTML文档下载 WORD文档下载 PDF文档下载
VB利用 API 可以直接拨号

声明:

Private Declare Function tapiRequestMakeCall Lib "TAPI32.DLL" (ByVal DestAddr$, ByVal AppName As String, ByVal CalledParty As String, ByVal Comment As String) As Long
例子:
Public Sub CallPhone(Number As String, Name As String)
 Dim lRes As Long
 If (Trim(Number) = "") Then
  Exit Sub
 End If
 If (MsgBox("About to call " & Trim(Name) & " at phone number " & Trim(Number) & vbCrLf & "Do it?", vbYesNo, App.Title) = vbYes) Then
  lRes = tapiRequestMakeCall(Trim(Number), App.Title, Trim(Name), "")
  Debug.Print Now; " CallPhone -> tapiRequestMakeCall Result code = "; lRes
 End If
End Sub

还有一种方法是:
PhoneNumber$ = "(123)456-7890"
Open "COM2:" For Output As #1 'or COM1
Print #1, "ATDT" & PhoneNumber$ & Chr$(13)
Close #1
当然,该方法只适合小型的应用。
微软、思科、Google、Facebook等联合推出CII 狙击“Heartbleed” 这是个神奇的国度:细数五大印度裔IT牛人CEO Atmel CMO Sander Arts眼中的创客运动 Unity“三巨头”:全心全意为开发者服务 全球移动广告现状报告:哪种平台、应用最赚钱? 《近匠》Smart Wallit,钱包找不到了?给它“打个电话”吧 Mozilla新CTO:JavaScript、 Firefox OS专家Andreas Gal 李彦宏发布百度大数据引擎,及与谷歌、亚马逊等类似项目对比 大数据领域,实时打击欺诈犯罪的4个战场 一周消息树:谷歌Project Ara,将开启下一个智能手机时代 数据恢复服务商的6个最佳实践 【走近讲师】谭晓生:魔高一尺道高一丈,360基于大数据的网络攻击检测 一周热点:摩尔定律让位于贝索斯定律 阿里巴巴集团CTO王坚确认出席第六届中国云计算大会 【走近讲师】青云甘泉:混合云的构建及其对企业的帮助 RadiumOne创始人兼CEO因家暴被公司解雇 3D打印狂潮:可检测皮肤疾病的低价手机显微镜 浅谈导航设计,开发者必备的十大实用技巧 【云先锋 41】上海越诚:基于云服务的建站类iService软件超市 董西成:Hadoop将在高速发展和完善中扩大优势! 【走近讲师】 华云数据郁珉:公有云市场八仙过海 价格不是唯一标准! Facebook、Twitter、Google移动广告之争 开发者的黄金时代=运维人员的恶梦? 研发团队平稳度过“从小到大”并非易事 诺基亚品牌手机不久将消失 Stephen Elop回应不是木马 看七家科技公司Logo的最初模样 移动UI框架Fries:私人定制最Sexy的用户界面 必须Mark!最佳HTML5应用开发工具推荐 百度技术开放日感悟:看百度如何获取大数据时代的“船票” 谷歌亚马逊微软的烧钱游戏 拉手网CTO官冲:团购网在大数据应用上的探索 qq设计 奇怪的VF,怎么修改Label1的caption? 赠送小程序者有分 如何配置外置Moderm??? 用户游览时在页面上启动了一个Timer,如何在用户关闭游览器时停止此Timer? 关于JBuilder中MSSQL2000在EJB设计时DataSource的连接问题?求救!!! linux 0.01是在UNIX上开发的吗? 裸机上怎么成功引导它的呢? 大家看看我程序错在何处,谢谢了 winroute代理怎么设置让指定的用户只能在指定的时间上网。。。 怎样写一份采用J2EE的框架的软件测试报告? C#还能使用BHO吗?如果能100分求C#使用BHO(browser helper object)的例子。 请问如何制作Win98启动盘(我现在没有Win98的机子)? 关于换行的问题 javascript判断操作系统 一个奇怪的time问题,偶是菜鸟了~~~~~~~~~~~ d7版本所带的qr是什么版本的? 请教:创建数据库表时,怎样突破默认字段长度? 免费注册 Jboss 或 应用服务器 除了网上有,买d版的不知道有没有啊,下载太慢啊!! datagrid 中的一例为4位小数的数据,如何在datagrid设置使其值显示为带二位小数?? 让你的企业、产品、网站一夜成名 企业中一般如何写数据字典阿?急,在线等待 文件上传 如何将txt文件导入mdb文件之中,在线等,解决问题立即给分。 在菜单中打开MDI窗口,但是每一次点击,就出现一个新窗口,如何只出现一个? 大侠,救命啊,这个编译错误,折磨我好几天了,如何解决啊?????? 求C语言程序:从键盘上输入若干个证书,去掉重复的,将剩余数的前n个输出显示 新手发问(有关C#和MySQL数据库)! 试用期的前几天会被安排做什么?(对于一个没有一点工作经验的大学生) 如何合并两个字符串?急!!! 请问哪有jive 的中文版原代码下载啊?? jdon的压缩包不好使!!谢谢 关于静态方法! tomcat 406 错误 如何遍历任务栏上已经打开的程序呢? 动态添加commandbutton后如何写其clicked()的事情 今天晚上可能要時間長了,那個算法的流程你看看,服務器的負載太大了,不斷的連接,數據碎片太多了 把dataSet里的多个表插入数据库时,怎么把这多个表作为一个事务? tomcat报出406号错误 CDONTS.NewMail发送邮件? 继承的问题 我的问题 C++ Primer和C++ Programming Language 哪本好一些呢? 哪位朋友可以给一个PHP4导航栏的代码(1 2 3 4 5 6 这样的) redhat9.0是否支持ich5 在VS2002中可以用的设置星期格式的代码,在VS2003下不能用,为什么? 请教一个关于时间的SQL语句! 关于多级菜单问题 我的电脑里的chm文档打不开了,求救~~~~~~~~~~~! 购买QQ,共1000分(1) 大家帮忙分析一下 请教,关于“name not Unique in this context”的错误。50分,急!!!! 请教一个小问题 You\'ll never understand! I'll never f___ your kindness. be ill in Some things,no matter how I tried to also cannot be changed这是什么意思? Mary,( )to the teachers' office.You're wanted by Miss Zhang.( )内填空 unless的用法 “衤”旁加“因”这个字打不出来,拼音可以的,五笔不行,你们说的PULD不行,不信试试 Happy Teachers'Day( )you.括号里用to还是for It is my last--.I will never ask you anything again 横线上填什么? 衤申 有这个字吗怎么写?看清楚偏旁 要不就是没那衤字旁两点的也行 英译汉“I won\\\'t last a day without you\\ 浙江180项科技成果下月开槌出售安徽宁国民政局长否认叫停网友募捐 自日媒:解密文件显示日本曾试图阻止中美杭州一对匝道一段快速路两条断头路年底法国总统会见中国外长王毅 谴责北京暴东莞某校2个月开除21学生 乱扔垃圾四川宜宾一火葬场休息区变茶馆 想要坐17岁少年贩毒只为给爷爷办寿宴 从小杭州孩儿巷取消52个泊位后道路通行明收费站立闯关扎胎警告牌 回应称出于安杭州:拒绝工资集体协商 最高罚款3万4岁儿子不会写5和8中国队2比3不敌古巴追查疑案教育学生节约,得抓紧马航370搜寻重回起点遭家暴,最快48小时可获“人身保护令新苏师范附小 蓝缨学校联盟办学10块钱只能买3根端午期间多为阴雨天南京:6个护学岗的交警配枪上岗(图)社区团支部搭台 20位老人快乐忆童趣
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘