| 本月文章推荐 |
利用API可以直接拨号发表日期：2006-2-27
|
|
声明：
PrivateDeclareFunctiontapiRequestMakeCallLib"TAPI32.DLL" (ByValDestAddr$,ByValAppNameAsString, ByValCalledPartyAsString,ByValCommentAsString)AsLong 例子： PublicSubCallPhone(NumberAsString,NameAsString) DimlResAsLong If(Trim(Number)="")Then ExitSub EndIf If(MsgBox("Abouttocall"&Trim(Name) &"atphonenumber"&Trim(Number)&vbCrLf&"Doit?", vbYesNo,App.Title)=vbYes)Then lRes=tapiRequestMakeCall(Trim(Number),App.Title,Trim(Name),"") Debug.PrintNow;"CallPhone->tapiRequestMakeCallResultcode=";lRes EndIf EndSub 还有一种方法是： PhoneNumber$="(123)456-7890" Open"COM2:"ForOutputAs#1'orCOM1 Print#1,"ATDT"&PhoneNumber$&Chr$(13) Close#1 当然，该方法只适合小型的应用。-> |
| 上一篇：用VB实现聊天讨论室和点对点会话
人气:3326 下一篇：用VB实现应用程序在局域网络上自动更新 人气:4538 |
| 浏览全部Visual Basic的内容
Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐 |
