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

原作者:www.upwinder.com 添加时间:2007-09-02 原文发表:2007-08-31 人气:24 来源：未知

本文章共2797字，分2页，当前第1页，快速翻页：

或许你会认为用计算机进行电话录音需要昂贵的专用软件，其实只要懂得VB和ACCESS的一些基本知识，我们也可以自己制作一个具备电话录音、录音数据保存、查询功能的小系统。大概只需1500元左右，其费用主要用于增添所需的声卡、音箱及具有语音功能的Modem（当然还有你的脑力劳动），比起两三万元的专用录音软件，可以说是物美价廉了。
逆风者
首先介绍该系统的工作原理：利用VB5.0的OLE容器控件，在运行时创建嵌入对象的方法，激活在WIN95注册过的录音软件，将输入到声卡的电话语音信号录制为WAV文件，嵌入OLE容器控件中。由于把OLE容器控件与某个数据库绑定，在声音文件嵌入OLE容器控件的同时也存入了数据库。以下将详细地介绍小系统的实现过程，主要有设备的连接、数据库的建立、简单的VB编程。
一、设备的连接
设备的连接主要指Modem与电话线、电话机，Modem与声卡之间的连接方式。先将墙上的电话进线插到Modem的接口上，再用另一根电话线接在Modem与电话机之间，把Modem与电话机串联起来。Modem与电话机之间的顺序必须被考虑到。如果电话进线先进入电话机，当提起电话听筒时，信号将先被电话机截取，而不能进入Modem。接下来用双向音频输入输出线把Modem的SPK端口和声卡的LINE INC端口连起来；将Modem的声音信号输入到声卡。好了，完成设备的连接后，我们就可以开始进行软件方面的制作了。
二、用ACCESS建立一个收藏录音数据的数据库
首先建立一个存放声音数据的数据库，数据库可以是存储在Microsoft Jet数据库引擎中的Microsoft
Access、dBASE、Microsoft Foxpro、Excel等。由于需保存的数据并不复杂，我选用了小型而易用的Microsoft ACCESS97，建立一个名为Recorder的数据库来管理录音数据。在Recordeer数据库中生成表Recording，该表包含四个字段：ID、录音文件、Day、Time。结构如下：
-----------------------------------------------
字段名称数据类型字段属性
-----------------------------------------------
ID 自动编号递增
录音齐件 OLE对象
Day 日期/时间默认值=Date();格式=长日期
Time 日期/时间默认值=Time();格式=长时间
------------------------------------------------
把数据库Recorder保存在C:\下，以待后用。数据库方面的工作暂时到此为止，接着将要用VB来编写一个小程序，实现录音、自动将数据存入数据库的功能。
三、用VB5.0 建立录音小程序
在VB5.0下新建一“标准EXE”工程，打开工程中的空白窗体Form1。在Form1上添加各种控件。
1．在Form1上添加Data控件
将Data控件添加到窗体上，Data控件属性设置如下：
-------------------------------------------
（名称） Data1
-------------------------------------------
Connect ACCESS
DatabaseName C:\RECORDER.mdb
Recordsource recording
-------------------------------------------
以上属性设置把Data控件绑定到刚才建立的ACCESS 数据库Recorder的recording表。
2．在Form1上添加Text Box控件
在Form1上添加三个Text Box控件，并在适当位置增添相应的标签。文本框属性设置如下：
------------------------------------------------------------
Text Box控件1 Text Box控件2 Text Box控件3
------------------------------------------------------------
（名称） Text1 Text2 Text3
Data Field ID Day Time
Datasource Data1 Data1 Data1
------------------------------------------------------------
以上属性设置使三个Text Box绑定到Data控件，用于从与Data控件连接的数据库中分别显示字段ID、Day、Time。
3．在Form1上添加OLE容器控件
在Form1上添加OLE容器控件，属性设置如下：
----------------------------------
（名称） OLE1
----------------------------------
Data Field 录音文件
Datasource Data1
Autoactivate 2-Doubleclick

本文章更多内容：1 - 2 - 下一页>>

• 使用 ADO 來压缩或修复 Microsoft Access �

• 用VB6.0编写磁盘格式化程序

• VB中使用WinSock控件编写网络程序

• 在VB中更改SQL Server数据库结构

• 利用PictureClip进行图像局部处理

• 如何满屏播放AVI文件

• Visual Basic使用技巧

• 移除字串中不要的字符