短地址生成源码 php

短地址亦短网址

//www.iganlei.cn/tool/shorturl.php

  1. <?php  
  2. header(“content-type:text/html;charset=utf-8”);  
  3. ?>  
  4. <form method=“post” action=“” style=“align:center;”>  
  5. 请输入要生成短地址的url:  
  6. <br />  
  7. <input type=“text” id=“result” name=“url_long”size=“60”value=“”/>  
  8. <input type=“hidden” name=“access_token” value=“1”>  
  9. <input type=“submit” name=“sub” value=“生成”>  
  10. </form>  
  11. <?php  
  12. if($_POST[‘sub’] && $_POST[‘access_token’]=“1”)  
  13. {  
  14. if(preg_match(“#^http://(.*?).(com|net|cc|cn|org|tw|jp)#i”,$_POST[‘url_long’],$a)){  
  15. $url = $_POST[url_long];  
  16. }  
  17. else if(preg_match(“#([a-z0-9]).(com|net|cc|cn|org|tw|jp)#i”,$_POST[‘url_long’],$a)) {  
  18. $url = “http://”.$_POST[url_long];  
  19. }else  
  20. {  
  21. die(“输入有误,非网址,或请加上http://”);  
  22. }  
  23. //echo $url;  
  24. $url = urlencode($url);  
  25. $obj = json_decode(getShort($url),true);  
  26. //var_dump($obj);  
  27. //echo “<pre>”;  
  28. //print_r($obj);  
  29. //echo “</pre>”;  
  30. echo “原始地址:”?><a href=“<?php echo $obj[urls][0][url_long];?>”><?php echo $obj[urls][0][url_long];?></a>  
  31. <br />  
  32. 转换后的短地址为:<a href=“<?php echo $obj[urls][0][url_short];?>”><?php echo $obj[urls][0][url_short];?></a>  
  33. <script type=“text/JavaScript”>  
  34. document.getElementById(‘result’).value=“<?php if(isset($obj[urls])) echo $obj[urls][0][url_short];?>”;  
  35. </script>  
  36. <?php  
  37. //var_dump(json_decode(getShort($url)),true);  
  38. }  
  39. function getShort($url)  
  40. {  
  41. $url_long = “https://api.weibo.com/2/short_url/shorten.json?url_long=”.$url.“&access_token=XX”;  
  42. $ch =curl_init($url_long);  
  43. curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);  
  44.   
  45. $content = curl_exec($ch);  
  46. curl_close($ch);  
  47. return $content;  
  48. }  
  49. ?>  

未经允许不得转载:ganlei的个人博客 » 短地址生成源码 php

赞 (3)
分享到:更多 ()