gprs无线数传模块编程方法

《gprs无线数传模块编程方法》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、GPRS无线数传模块编程方法（VB）发布时间：2008-12-10游览次数：1684 一、在不同组网方式下的具体设置：  要使PC机成为数据中心一般用到的有三种方式：(中心采用Intelnet公网连接、中心采用专线接入、拨号上网方式)  不管哪种方式PC机都需要一个固定IP。公网或专线方式的IP为网卡的IP；拨号上网方式的IP为无线Modem的GPRS卡绑定的IP。  1、公网方式：  因为PC机有了固定的IP，所以在使用的时候，不需要做什么特别的设置就行了，只要将模块的APN名称设为CMNET就

2、行。  2、专线方式：PC机由网卡可以登录到数据服务器所在的网络内。  具体实现方法：设置PC机的本地连接，（主要是IP地址和网关，网关为数据服务器的网关）设置完成后，可以用Ping命令测试网络是否通。  步骤：点击“开始”—“运行”，在‘打开’中输入Ping数据服务器的IP,（如莱芜力创的数据服务器IP为192.168.0.164，输入Ping192.168.0.164）回车。模块的APN名称设为LICHUANG.LW.SD  3、拨号上网方式：PC机由无线Modem可以登录到数据服务器所在的网

3、络内。  a、无线Modem（调制解调器）有几种?  一般情况下，我们使用的有两种，一种为USB连接的，一种为串口连接的。  b、怎样设置可以使无线Modem登录到数据服务器所在的网络？  先将调制解调器正确连接到计算机上。  对调制解调器进行安装：控制面板—添加新硬件—从列表中选择“调制解调器”—选择此调制解调器所使用的端口—在区号中输入‘086’，选择音频，拨打外线区号可以不输入。  调制解调器安装完成后，还要诊断一下是否安装正确，安装的调制解调器是否可用。步骤为：控制面板—调制解调器—属性—

4、诊断。  对调制解调器进行配置：控制面板—调制解调器—属性—高级，在额外的初始化命令中，  如果是使用东营的GPRS卡，则在附加设置中输入（“AT+CGDCONT=1，”IP”,”DYSHL.SD””）  如果使用的是力创的GPRS卡，则在附加设置中输入（“AT+CGDCONT=1,”IP”,”LICHUANG.LW.SD””）  c、怎样建立拨号连接？  正确连接调制解调器后，还要建立拨号连接才可以。详细步骤为：  右击‘网上邻居’—属性—建立新连接—选择拨号到专用网络—在输入电话号码时输入‘*

5、99***1#’，其于情况默认点击‘下一步’即可。  d、拨号上网方式的IP怎样获得？  判断数据中心（无线Modem）的IP，方法有多种：  先拨号连接，待拨号连接成功后，  在任务栏中右击”拨号连接”的图标,选择’状态’,在弹出的画面中选择’信息’,看一下’客户端IP’就行了。  选择开始—运行（输入cmd回车）—输入ipconfig回车，便可以看到拨号连接的IP了。  e、怎样让无线Modem掉线后自动重拨？  无线Modem在使用的过程中会出现掉线的情况，因为用户不可能总是关注此时的无线M

6、odem是否掉线了，为了使无线Modem不耽误数据传输，可以将其设置成掉线后自动重拨的功能。  具体操作为：  先查找到‘拨号连接’（在拨号网络中）—属性—选项  在‘拨号选项’中去掉所有的选项，选中‘重拨选项’中的断线重拨即可。  在设置时也可以将重拨次数设置的更大一些，比如说10次，不设置也可，用户可根据实际情况来定。  在‘重拨选项’中有一项为‘挂断前的空闲时间’，我们一般设置为“从不”。如果设置为某个时间，则连接时间到了该值时便出现掉线的状况。  图示为图1：      图1    二、一

7、般控件的编写：  控件实际上就是类的封装，一个类中可以定义自己的结构、属性、方法、事件。  1、结构：PrivateType结构名  MyNameasString'''结构中的参数  MyAgeasInteger  EndType    2、属性：  Dimm_GPRSLongAsLong  PublicPropertyLetGPRSLong(ByValNewGPRSLongAsLong)'''将表达式的值赋给变量或属性  m_GPRSLong=NewGPRSLong  PropertyChang

8、ed"GPRSLong"'''PropertyChanged方法是通知属性的值已经发生变化  EndProperty    PublicPropertyGetGPRSLong()AsLong'''读属性值  GPRSLong=m_GPRSLong  EndProperty    3、方法(函数)：  PublicFunctionStartServer(IpAsString,PortAsLong)AsBoolean  '''这种方法用户可以使用  EndFunction    Pri