KBMS — Thu, 14 Jun 2012 16:19:00 GMT

JAVA发送手机短�?��传有几�U�方�?
(1)使用webservice接口发送手机短�?�q�个可以使用sina提供的webservice�q�行发�?但是需要进行注�?
(2)使用短信mao的方式进行短信的发�?�q�种方式应该是比较的常用,前提是需要购买硬件设�?
(3)使用中国�|�徏提供的SMS短信�q�_��Q�申误�̎号地址�Q?a rel="nofollow">http://sms.webchinese.cn/default.shtml�Q?/span>
文章介绍(3)的��?/span>

SMS短信通API下行接口参数

GBK�~�码发送接口地址�Q?br /> http://gbk.sms.webchinese.cn/?Uid=本站用户�?amp;Key=接口安全密码&smsMob=手机��L��&smsText=短信内容
UTF-8�~�码发送接口地址�Q?/strong>
http://utf8.sms.webchinese.cn/?Uid=本站用户�?amp;Key=接口安全密码&smsMob=手机��L��&smsText=短信内容
获取短信数量接口地址(UTF8)�Q?/strong>
http://sms.webchinese.cn/web_api/SMS/?Action=SMS_Num&Uid=本站用户�?amp;Key=接口安全密码
获取短信数量接口地址(GBK)�Q?/strong>
http://sms.webchinese.cn/web_api/SMS/GBK/?Action=SMS_Num&Uid=本站用户�?amp;Key=接口安全密码

提示:HTTP调用URL接口�? 参数值必��URL�~�码后再调用

参数变量说明

Gbk�~�码Url http://gbk.sms.webchinese.cn/

Utf-8�~�码Url http://utf8.sms.webchinese.cn/

Uid 本站用户名（如您无本站用户名请先注册�Q?/td>

Key 注册时填写的接口安全密码�Q�可到用户��^��C��改安全密码）

smsMob 目的手机��L��Q�多个手机号��L��半角逗号隔开�Q?/td>

smsText 短信内容�Q�最多支�?00个字�Q�普通短�?0个字/条，长短�?4个字/条计�?/td>

多个手机可��用半�?隔开
如：13888888886,13888888887,1388888888 一�ơ最多对50个手机发�?br /> 短信内容支持长短信，最�?00个字�Q�普通短�?0个字/条，长短�?4个字/条计�?/p>

短信发送后�q�回�?/th> 说　�?/th>

-1 没有该用戯�̎�?/td>

-2 密钥不正��（不是用户密码�Q?/td>

-3 短信数量不��

-11 该用戯��用

-14 短信内容出现非法字符

-4 手机��h��式不正确

-41 手机��L��为空

-42 短信内容为空

大于0 短信发送数�?/td>

　　注：调用API接口�Q�请��d��q�_��Q�申�?06�|�关发送，卛_��卛_��Q?br /> 　　发送测试短信请勿输入：短信��试�{�词语，��L��接提交您要发送的短信内容�Q?br /> 　　接口发送短信时请在内容后加�{�֐��Q�【XX公司或XX�|�名�U�】，否者会�?/strong>屏蔽�?br /> 　　短信�{�֐�可在用户�q�_��q�_��上设�|�，也可以在短信内容后，直接加入�?/strong>

ASP�E�序实例	C#�E�序�C�Z��	JAVA�E�序�C�Z��	PHP�E�序�C�Z��	VB.NET�E�序实例

1. ASP 调用例子
<%
              '常用函数
'输入url目标�|�页地址�Q�返回值getHTTPPage是目标网��늚�html代码
function   getHTTPPage(url)
              dim Http
              set   Http=server.createobject("MSXML2.XMLHTTP")
              Http.open   "GET",url,false
              Http.send()
              if Http.readystate<>4 then
              exit   function
              end if
              getHTTPPage=bytesToBSTR(Http.responseBody,"GB2312")
              set   http=nothing
              if err.number<>0 then err.Clear
              end   function
              Function BytesToBstr(body,Cset)
              dim objstream
              set objstream =   Server.CreateObject("adodb.stream")
              objstream.Type = 1
              objstream.Mode   =3
              objstream.Open
              objstream.Write body
              objstream.Position =   0
              objstream.Type = 2
              objstream.Charset = Cset
              BytesToBstr =   objstream.ReadText
              objstream.Close
              set objstream = nothing
              End   Function

              '自已�l�合一下提交的URL加入自己的�̎号和密码
sms_url="http://sms.webchinese.cn/web_api/?Uid=账号&Key=接口密钥&smsMob=手机��L��&smsText=短信内容"
response.write   getHTTPPage(sms_url)
              %>

2.C# 调用
//需要用到的命名�I�间
using System.Net;
              using System.IO;
              using   System.Text;
              //调用时只需要把拼成的URL传给该函数即可。判断返回值即�?br /> public string   GetHtmlFromUrl(string url)
              {
              string strRet = null;

if(url==null || url.Trim().ToString()=="")
              {
              return   strRet;
              }
              string targeturl =   url.Trim().ToString();
              try
              {
              HttpWebRequest hr =   (HttpWebRequest)WebRequest.Create(targeturl);
              hr.UserAgent = "Mozilla/4.0   (compatible; MSIE 6.0; Windows NT 5.1)";
              hr.Method = "GET";
              hr.Timeout =   30 * 60 * 1000;
              WebResponse hs = hr.GetResponse();
              Stream sr =   hs.GetResponseStream();
              StreamReader ser = new StreamReader(sr,   Encoding.Default);
              strRet = ser.ReadToEnd();
              }
              catch (Exception   ex)
              {
              strRet = null;
              }
              return strRet;
              }

3.JAVA调用

import java.io.UnsupportedEncodingException;
import org.apache.commons.httpclient.Header;
import org.apache.commons.httpclient.HttpClient;
import org.apache.commons.httpclient.NameValuePair;
import org.apache.commons.httpclient.methods.PostMethod;

public class SendMsg_webchinese {

              public static void main(String[] args)throws Exception
              {

              HttpClient client = new HttpClient();
              PostMethod post = new PostMethod("http://gbk.sms.webchinese.cn");
              post.addRequestHeader("Content-Type","application/x-www-form-urlencoded;charset=gbk");//在头文�g中设�|��{�?br /> NameValuePair[] data ={ new NameValuePair("Uid", "本站用户�?),new NameValuePair("Key", "接口安全密码"),new NameValuePair("smsMob","手机��L��"),new NameValuePair("smsText","短信内容")};
post.setRequestBody(data);

              client.executeMethod(post);
              Header[] headers = post.getResponseHeaders();
              int statusCode = post.getStatusCode();
              System.out.println("statusCode:"+statusCode);
              for(Header h : headers)
              {
              System.out.println(h.toString());
              }
              String result = new String(post.getResponseBodyAsString().getBytes("gbk"));
              System.out.println(result);

              post.releaseConnection();

              }

}

jar包下�?/strong>
commons-logging-1.1.1.jar
commons-httpclient-3.1.jar
commons-codec-1.4.jar

4.PHP
$url='http://sms.webchinese.cn/web_api/?Uid=账号&Key=接口密钥&smsMob=手机��L��&smsText=短信内容';

echo Get($url);
              function   Get($url)
              {
              if(function_exists('file_get_contents'))
              {
              $file_contents   = file_get_contents($url);
              }
              else
              {
              $ch = curl_init();
              $timeout =   5;
              curl_setopt ($ch, CURLOPT_URL, $url);
              curl_setopt ($ch,   CURLOPT_RETURNTRANSFER, 1);
              curl_setopt ($ch, CURLOPT_CONNECTTIMEOUT,   $timeout);
              $file_contents =   curl_exec($ch);
              curl_close($ch);
              }
              return $file_contents;
              }

5.VB.NET
'调用发送短�?NoList接收��L��.多个之间�?分开,Memo内容70�?br /> Public Function SendSMS(ByVal NoList As String, ByVal Memo As String) As String
            Dim Url As String = "http://sms.webchinese.cn/web_api/?Uid=账号&Key=接口密钥&smsMob=手机��L��&smsText=短信内容"
Dim webClient As New Net.WebClient()
            Try
            'Dim responseData As Byte() =
            Dim srcString As String = webClient.DownloadString(Url)
            Return srcString
            Catch
            Return "-444"
            End Try
            End Function

KBMS 2012-06-15 00:19 发表评论

久久影视综合亚洲,青青草原亚洲视频,亚洲综合另类小说色区