手抄报 安全手抄报 手抄报内容 手抄报图片 英语手抄报 清明节手抄报 节约用水手抄报

编制自已的电话录音小程序

时间:2024-10-13 16:14:30

1、设备的连接设备的连接主要指Modem与电话线、电话机,Modem与声卡之间的连接方式。先将墙上的电话进线插到Modem的接口上,再用另一根电话线接在Modem与电话机之间,把Modem与电话机串联起来。Modem与电话机之间的顺序必须被考虑到。如果电话进线先进入电话机,当提起电话听筒时,信号将先被电话机截取,而不能进入Modem。接下来用双向音频输入输出线把Modem的SPK端口和声卡的LINE INC端口连起来;将Modem的声音信号输入到声卡。好了,完成设备的连接后,我们就可以开始进行软件方面的制作了。

编制自已的电话录音小程序

2、用Access建立一个收藏录音数据的数据库首先建立一个存放声音数据的数据库,数据库可以是存储在Microsoft Jet数据库引擎中的MicrosoftAccess、dBASE、Microsoft Foxpro、Excel等。由于需保存的数据并不复杂,我选用了小型而易用的Microsoft Access97,建立一个名为Recorder的数据库来管理录音数据。在Recordeer数据库中生成表Recording,该表包含四个字段:ID、录音文件、Day、Time。结构如下:字段名称 数据类型 字段属性ID 自动编号 递增录音齐件 OLE对象Day 日期/时间 默认值=Date();格式=长日期Time 日期/时间 默认值=Time();格式=长时间把数据库Recorder保存在C:\下,以待后用。数据库方面的工作暂时到此为止,接着将要用VB来编写一个小程序,实现录音、自动将数据存入数据库的功能。

编制自已的电话录音小程序

3、用VB5.0 建立录音小程序在VB5.0下新建一“标准EXE”工程,打开工程中的空白窗体Form1。在Form1上添加各种控件。1.在Form1上添加Data控件将Data控件添加到窗体上,Data控件属性设置如下:(名称) Data1Connect AccessDatabaseName C:\RECORDER.mdbRecordsource recording以上属性设置把Data控件绑定到刚才建立的Access数据库Recorder的recording表。

编制自已的电话录音小程序

4、在Form1上添加Text Box控件在Form1上添加三个Text Box控件,并在适当位置增添相应的标签。文本框属性设置如下:Text Box控件1 Text Box控件2 Text Box控件3(名称) Text1 Text2 Text3Data Field ID Day TimeDatasource Data1 Data1 Data1以上属性设置使三个Text Box绑定到Data控件,用于从与Data控件连接的数据库中分别显示字段ID、Day、Time。

编制自已的电话录音小程序

5、在Form1上添加OLE容器控件在Form1上添加OLE容器控件,属性设置如下:(名称) OLE1Data Field 录音文件Datasource Data1Autoactivate 2-Doubleclick通过属性设置把它与Data控件绑定,从Recorder数据库中显示字段“声音文件”。当OLE容器中的录音数据被更新时,被更新或新增的声音对象将自动被写回数据库。当双击OLE容器中的数据时,将自动播放声音文件。

编制自已的电话录音小程序

6、在Form1上添加Command Button控件添加两个Command Button控件到Form1上,其中一个命令按钮用于调吹涡皋陕用录音机以录制通话数据,并将录音的声音数据嵌入到OLE容器中。该按钮属性设置如下:(名称) Command1Caption 开始录音双击Command1,在Private Sub Command1_Click()中输入以下代码:Data1.DatabaseName="C:\recorder.mdb"Data1.Recordsource="Recording"Data1.Refresh '创建一条新记录Data1.Recordset.AddNew '创建一个嵌入声音对象OLE1.CreateEmbed "","SOUNDREC" '激活WIN95附件下的录音机OLE1.DoVerb 0End Sub

编制自已的电话录音小程序

7、另一个按钮用于关闭程序,属性设置如下:(名称) Command2Caption 退出双击Command2,在Private Sub Command2_Click()中输入以下代码:Unload Form1EndEnd Sub

编制自已的电话录音小程序
© 手抄报圈