今天闲来无事,在微博上看到一个关于用java实现的一个发送手机短信的程序,看了看,写的不太相信,闲的没事,把他整理下来,以后可能用得着
JAVA发送手机短信,流传有几种方法:(1)使用webservice接口发送手机短信,这个可以使用sina提供的webservice进行发送,但是需要进行注册;(2)使用短信mao的方式进行短信的发送,这种方式应该是比较的常用,前提是需要购买硬件设备,呵呵(3)使用中国网建提供的SMS短信平台(申请账号地址:http://sms.webchinese.cn/default.shtml)
本程序主要是运用了中国网建提供的SMS短信平台,这个短信平台基于java提供个专门的接口,话不多说。,上代码,有代码有真相,呵呵
运行本程序首先的代入三个jar包:
commons-codec-1.4
commons-httpclient-3.1
commons-logging-1.1.1
请自行下载,呵呵
GBK编码发送接口地址:
http://gbk.sms.webchinese.cn/?Uid=本站用户名&Key=接口安全密码&smsMob=手机号码&smsText=短信内容 
UTF-8编码发送接口地址:
http://utf8.sms.webchinese.cn/?Uid=本站用户名&Key=接口安全密码&smsMob=手机号码&smsText=短信内容
获取短信数量接口地址(UTF8):
http://sms.webchinese.cn/web_api/SMS/?Action=SMS_Num&Uid=本站用户名&Key=接口安全密码
获取短信数量接口地址(GBK):
http://sms.webchinese.cn/web_api/SMS/GBK/?Action=SMS_Num&Uid=本站用户名&Key=接口安全密码
 
| 短信发送后返回值 | 说 明 | 
| -1 | 没有该用户账户 | 
| -2 | 密钥不正确(不是用户密码) | 
| -3 | 短信数量不足 | 
| -11 | 该用户被禁用 | 
| -14 | 短信内容出现非法字符 | 
| -41 | 手机号码为空 | 
| -42 | 短信内容为空 | 
| 大于0 | 短信发送数量 | 
注:上面的用户名和密码是我原先申请的,不知道为什么被停用了,在运行本程序之前请先到SMS短信平台去申请一个用户名和密码。
 
 
附:
| 1. ASP 调用例子<%
 '常用函数
 '输入url目标网页地址,返回值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
 
 '自已组合一下提交的URL加入自己的账号和密码
 sms_url="http://sms.webchinese.cn/web_api/?Uid=账号&Key=接口密钥&smsMob=手机号码&smsText=短信内容"
 response.write getHTTPPage(sms_url)
 %>
 
 | 
| 2.C# 调用 //需要用到的命名空间
 using System.Net;
 using System.IO;
 using System.Text;
 //调用时只需要把拼成的URL传给该函数即可。判断返回值即可
 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");//在头文件中设置转码
 NameValuePair[] data ={ new NameValuePair("Uid", "本站用户名"),new NameValuePair("Key", "接口安全密码"),new NameValuePair("smsMob","手机号码"),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包下载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=手机号码&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接收号码.多个之间用,分开,Memo内容70字
 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=手机号码&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
 |