| 
				       
				
				近两年来,短信息的使用越来越广泛,它已逐渐成为年轻人日常沟通的重要手段。同时,一些软件开发企业也看到了短信的应用前景,纷纷计划将短信功能加入到公司的产品中。 
				   
				
				要使自己的应用软件拥有短信收发功能,如全部从底层开发做起要耗费大量的人力、物力,还要研究GSM的相关通讯标准,开发周期也比较长。为了能让企业快速开发出具有短信功能的应用软件,我公司提供了一套高可靠性的短信开发包,支持中英文短信的收发,支持目前市场上大部分的手机和GSM专用模块。 
				   短信开发包是以OCX控件的形式提供,支持Windows平台下常用的开发工具:如VB、VC++、Power 
				Builder等。 
				目前版本的开发包还提供了用VB6.0和PB8.0写成的利用短信控件收发信息的例子。 
				u      
				GSM猫与计算机连接 
				1、通过GSM猫厂商提供的线缆,与计算机的串口相连接 
				u      
				控件特点 
				u      
				开发包文件列表 
					
						| 
						文件或目录名称 | 
						说明 |  
						| 
						短信控件开发手册.doc | 
						本手册,介绍控件的使用方法。 |  
						| 演示程序 | 
						控件使用例子的源代码,包括VB6.0、Delphi 
						7.0和PB7.0 |  
						| SMSOCX.ocx | 
						核心控件,被安装在系统的system32目录下。 |  
						| MSCOMM32.ocx | 微软公司的MSCOMM32.OCX |  
						|   |   |  
				u      
				特别提示!! 
				1、由于本控件使用了微软公司的MSCOMM32.OCX,所以用户在开发程序时,除了要分发本控件外,还要包括MSCOMM32.OCX。在开发包中的MSCOMM32文件夹中包含了此控件,用该文件夹下的setup安装此控件 
				2、本GSM猫的二次开发包控件的安装方法:用SMSOCX文件夹下的setup安装此控件。 
				3、对于西门子GSM猫,波特率设为:9600 
				2、控件使用说明 
				
				u     
				
				属性 
				无 
				
				u     
				
				方法 
				²       
				连接GSM猫
				(ConModem) 
				功能描述:连接Gsm猫的端口 
				参数:commName   
				端口号 
				如:com1 
				      commRate    
				波特率 
				如:9600 
				返回:  
				True           
				成功 
				              
				False      
				失败 
				²       
				断开GSM猫(DisConModem) 
				功能描述:断开Gsm猫的端口 
				参数:无 
				返回: 
				无 
				²       
				得到短信中心号
				(getCenterNO) 
				功能描述:读取GSM猫的短消息中心号 
				参数:无 
				返回: 
				短消息中心号 
				²       
				发送短消息
				(SendMsg) 
				功能描述:发送短消息
				 
				参数:  
				num       字符串   
				对方的手机号码
				 
				str             
				字符串    
				短消息内容 
				返回:  
				True           
				发送成功 
				              False 
				    发送失败    
				本控件支持中英文(中文70个,英文160个),支持自动分割短消息。 
				²       
				读取手机中的短消息
				(ReadMsg) 
				功能描述:从手机SIM卡中的读取短消息
				 
				参数:  
				Index  SIM卡中短信的类型 
				        4,全部短信 
				返回: 
				无 
				调用此方法是如果SIM卡中存在相同的类型的消息自动触发事件RecvMsg 
				
				u     
				
				事件 
				²       
				RecvMsg 
				       
				当短信到达时触发这个事件,具体返回的参数为: 
				recvTime        
				日期时间型     
				收到短信的时间 
				MsgContent   
				字符串型       
				短信的内容 
				phoneNO       字符串型       
				短信的发送方号码 
				获取来电号码(并自动挂断电话) 
				inCall 
				   当来电到达时触发这个事件,具体返回的参数为 
				phoneNO    
				字符串型          
				返回来电号码 
				例子: 
				Private Sub 
				Modem1_inCall(ByVal phoneNO As String) 
				 Text1.Text = 
				Text1.Text + phoneNO 
				End Sub  
				  |