大雀软件园

首页 软件下载 安卓市场 苹果市场 电脑游戏 安卓游戏 文章资讯 驱动下载
技术开发 网页设计 图形图象 数据库 网络媒体 网络安全 站长CLUB 操作系统 媒体动画 安卓相关
当前位置: 首页 -> 技术开发 -> 程序开发 -> VFP中实现电话拨号

VFP中实现电话拨号

时间: 2021-07-31 作者:daque

    用VFP 处置手刺簿、通讯录时,常常要用到电话拨号步调。如径直运用Windows 98自带的拨号步调,VFP 步调的完备性和界面普遍性都将遭到感化。  ?安排思维  ?要实行拨号,只需让步调往串口写入at 吩咐。运用VFP 对Microsoft CommControl 控件的扶助不妨简单地遏制电话。?假如有一数据表Communication .dbf ,实质如次:?全名电话号子其余?张三1234567ETC?……?将上述表引入表单Form1的数据情况之后,在Form1上介入下列控件,如次所示:?控件称呼控件典型控件属性值?Text1Text ControlSource =communication .全名?Text2Text ControlSource =communication .电话号子?Command1Command Button Caption =“拨号”?Command2Command Button Caption =“挂断”?Command3Command Button Caption =“下条记载”?在表单中介入OLE 容器控件,当提醒菜单出当前,采用Insert Control ,在Control Type(控件典型)栏内找到并双击Microsoft CommControl ,这时候表单上会展示一个带电话标记的图标,设定该控件的称呼为Telephone ,这即是在VFP 中实行电话拨号的中心元件。采用Telephone 控件,单击鼠标右键,采用MSCommProperties 菜单项,不妨越发精巧地遏制该控件。  ?设定事变代码?在Form1的Init 事变中介入下列代码:?go top?*设定通信端标语,可按照你的本质情景设定?*笔者的Modem 是接在Com3上的?thisform.telephone .CommPort =3?*设定端口的通信速度(波特率)、通信字长以及能否举行校验?thisform.telephone .Settings =″9600,n ,8,1″?在Command1的Click 事变中介入下述代码:?this .enabled =.not .this .enabled?thisform.command2.enabled =.t .?*打开明信端口,筹备处事?thisform.telephone .portopen =.t .?*ATDT表白实行AT吩咐中的DT训令,D 表白开始挂断电话?*T表白运用音频拨号,即使你的电话运用的是脉冲办法拨号?*请将T改为P,CHR(13)表白发送吩咐结束?thisform.telephone .output =″ATDT″+电话号子+chr(13)?wait wind″正在拨号,请稍候″nowa?在Command2的Click 事变中写入下列代码:?thisform.command1.enabled =.t .?thisform.command2.enabled =.f .?*封闭通讯端口?thisform.telephone .portopen =.f .?在Command3的Click 事变中写入下列代码:?skip? if eof()?go top?endi?thisform.refresh?过程上头几个办法,大功成功了。戴上耳机,对着发话器。?(四川省新都县国度税务局610500)

热门阅览

最新排行

Copyright © 2019-2021 大雀软件园(www.daque.cn) All Rights Reserved.