青草国产精品久久久久久,国产高清一区二区三区视频,免费av一区二区三区,午夜熟女插插XX免费视频

6、發(fā)送回車，返回OK，發(fā)送完成。

二、一個簡單的VB程序 發(fā)送短信

三、使用PHP操作串口來完成短信發(fā)送 windows下

注意幾點：

1.必須要有php_dio.dll這個文件，原來我的php 是5.2.1的，因為php在5.0的時候已經(jīng)把dio給去掉了，所有不能用串口了，說是放在pecl庫里了，哎，網(wǎng)上找了半天，才找到php5.2.6 和pecl5.2.6，把自己的版本也更新到5.2.6，這樣就可以調(diào)用串口了

2.發(fā)中文遇亂碼的問題，在測試的時候都是亂碼，后來發(fā)現(xiàn)我的文件是utf-8的，改成gb2312就好了

以下是我的程序，我把一些不要的東西去掉了，但可以發(fā)短信，在xp+apache+php5.2.6測試成功！

[code="PHP"]
<?php
function gb2unicode($str) {
return iconv("gb2312", "UCS-2", $str);
}
function hex2str($hexstring) {
$str = '';
for($i=0; $i<strlen($hexstring); $i++){
$str .= sprintf("%02X",ord(substr($hexstring,$i,1)));
}
return $str;
}

function InvertNumbers($msisdn) {
$len = strlen($msisdn);
if ( 0 != fmod($len, 2) ) {
$msisdn .= "F";
$len = $len + 1;
}

for ($i=0; $i<$len; $i+=2) {
$t = $msisdn[$i];
$msisdn[$i] = $msisdn[$i+1];
$msisdn[$i+1] = $t;
}
return $msisdn;
}

/*---------------主程序--------------*/
set_time_limit(0);
$DEBUG = 0;

exec('mode COM2: baud=9600 data=8 stop=1 parity=n xon=off');

$fd = dio_open('COM2:', O_RDWR);//opens the file for both reading and writing.

if(!$fd)
{
die("打開串口COM2失敗");
}

$ff = dio_stat($fd);
print_r($ff);

echo "GSMAT is start on COM2\n";

$smsc = "8613800531500";// 短信中心號碼（我用的是杭州的，自己改）

$max_len = 280;// 短信最大長70個漢字，Unicode表示需280個字?
$invert_smsc = InvertNumbers($smsc);//683108501705F0
$len = 1; $s = chr(13);//'空格'


$msisdn = "86".'13864129404';//（接收的號碼）
$sms_text = '中文字符能用嗎？';//短信內(nèi)容


$pdu_text = hex2str(gb2unicode($sms_text));
$invert_msisdn = InvertNumbers($msisdn);

// 拆分發(fā)送超?0漢字的短?todo: 沒有判斷全英文的情況)
do {
$pdu_len = strlen($pdu_text);
if ( $pdu_len > $max_len ) {
$pdu_text1 = substr($pdu_text, 0, $max_len);
$pdu_text = substr($pdu_text, $max_len, $pdu_len - $max_len);
} else {
$pdu_text1 = $pdu_text;
$pdu_text = "";
}

$pdu_len1 = sprintf("%02X", strlen($pdu_text1)/2);
$pdu_text1 = $pdu_len1 . $pdu_text1;

$pdu_text1 = "11000D91" . $invert_msisdn ."000800" . $pdu_text1;

$atcmd = "AT+CMGS=" . sprintf("%d", strlen($pdu_text1)/2) . chr(13);
$l = strlen($atcmd);
$ll = @dio_write($fd,$atcmd);//Returns the number of bytes written to fd.

sleep(1);

$pdu_text1 = "0891" . $invert_smsc . $pdu_text1 . chr(26).chr(13);//ctrl+z 和 回車
$l = strlen($pdu_text1);
$ll = @dio_write($fd,$pdu_text1);

} while ( $pdu_text != "" );


dio_close($fd);

?>
[/code]