关于Modem的问题!(50分)

最近我要做一个远程监控的程序。现在的问题是，如何向一个已知道电话号码的Modem
传输数据。盼望各位高手的回复！谢谢！

：）
首先声明：一定要给分！我穷的可怜[]
使用Spcomm控件，进行数据传送，在传送数据前要先初始化Modem，受到Modem发回的OK，然后在发送命令！
具体程序：
初始化：Comm1.WriteCommData('AT&F'#13#10,6);
拨号：SS:='ATDT'+Str+#13#10;//Str中存放的是电话号码
Comm1.WriteCommData(Pchar(SS),Length(SS));
此时收到对方发送过来的connect后就可以进行数据发送了！
挂段：SS:='+++'+'#13#10';//ss是定义的字符串
Comm1.WriteCommData(Pchar(SS),SizeOf(SS));
Comm1.WriteCommData('+++'#13#10,5);
Delay(nil,10000);//延时
//
SS:='ATHO'+'#13#10';
Comm1.WriteCommData(Pchar(SS),SizeOf(SS));
Comm1.WriteCommData('ATH0'#13#10,6);
有什么疑问可以和我联系：cjh_xf@sina.com
有个比较不全面的原码，可供参考！

gz

谢谢！cjh_xf的回复！分数不是问题！50分给你！：）！