搜索
首页php教程PHP源码php+txt短网址压缩[自留]

php+txt短网址压缩短网址服务可以帮助你把一个长网址缩短,方便你在社交网络和微博上分享链接。所有源码见下!以一段时间搞的那个不知道怎么回事不好使了.用的 新浪的接口,不知道怎么回事了,又找了一下php+txt这个还不错已经修改了,增加了重复网址的判断演示:http://u.bitefu.net

<?php header("content-Type: text/html; charset=utf-8");
ob_start();?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html;charset=utf-8" />
<title>比特福短网址压缩,免费网址压缩!快速、稳定!|u.bitefu.net</title>
<meta name="keywords" content="网址压缩,短网址压缩,url压缩" />
<meta name="description" content="比特福短网址压缩u.bitefu.net,是国内专业的网址压缩网站,免注册!快速、稳定。做最好的网站压缩网站!" />
<style type="text/css">
body {font-family:Geneva, Arial, Helvetica, sans-serif;font-size:0.9em;text-align:center;}
a, a:hover, a:visited {color:#d20000;}
form {padding:15px;margin:0;border:1px solid #dddddd;width:75%;}
form label {font-weight:bold;padding-right:10px;}
form input {border:1px solid #dddddd;border-right:2px solid #cccccc;border-bottom:2px solid #cccccc;padding:4px;}
form input.button {background-color:#D20000;font-weight:bold;font-size:0.8em;color:#ffffff;border:1px solid #FF0505;border-right-color:#9E0000;border-bottom-color:#9E0000;font-family:Verdana, Arial, Helvetica, sans-serif;}
</style>
</head>
<body>

<?php
/*
location of file to store URLS
*/
$file= &#39;urls.txt&#39;;/* 
use mod_rewrite: 0 - no or 1 - yes
*/
$use_rewrite= 1;/*
language/style/output variables
*/
$l_url= &#39;URL&#39;;$l_nourl= &#39;<strong>没有输入URL地址</strong>&#39;;
$l_yoururl= &#39;<strong>你的短网址:</strong>&#39;;
$l_invalidurl= &#39;<strong>无效的URL.</strong>&#39;;
$l_createurl= &#39;生成短网址&#39;;//////////////////// NO NEED TO EDIT BELOW ////////////////////
$dir= dirname($_SERVER[&#39;PHP_SELF&#39;]);
if(!is_writable($file) || !is_readable($file))
{die(&#39;Cannot write or read from file. Please CHMOD the url file (urls.txt) by default to 777 and make sure it is uploaded.&#39;);}

$action= trim($_GET[&#39;id&#39;]);$action= (empty($action) || $action== &#39;&#39;) ? &#39;create&#39; : &#39;redirect&#39;;
$valid= "^(https?|ftp)://([a-z0-9+!*(),;?&=$_.-]+(:[a-z0-9+!*(),;?&=$_.-]+)?@)?[a-z0-9+$_-]+(.[a-z0-9+$_-]+)*(:[0-9]{2,5})?(/([a-z0-9+$_-].?)+)*/?(?[a-z+&$_.-][a-z0-9;:@/&%=+$_.-]*)?(#[a-z_.-][a-z0-9+$_.-]*)?$";$output= &#39;&#39;;
if($action== &#39;create&#39;){
    if(isset($_POST[&#39;create&#39;])){$url= trim($_POST[&#39;url&#39;]);
    $urlsarr= file($file);foreach($urlsarr as $v){$urls[]=trim($v);}$urlsid=array_search($url,$urls);
    if($urlsid){$urlid=$urlsid+1;
    $shorturl= ($use_rewrite== 1) ? "http://{$_SERVER[&#39;HTTP_HOST&#39;]}{$dir}{$urlid}" : "http://{$_SERVER[&#39;HTTP_HOST&#39;]}{$dir}{$filename}?id={$urlid}";
    $output= "{$l_yoururl} <a href=&#39;{$shorturl}&#39; target=&#39;_blank&#39;>{$shorturl}</a>";
    }else{if($url== &#39;&#39;){$output= $l_nourl;}
    else{if(eregi($valid, $url))
        {$fp= fopen($file, &#39;a&#39;);fwrite($fp, "{$url}rn");fclose($fp);$id= count(file($file));$filename= explode(&#39;/&#39;, $_SERVER[&#39;PHP_SELF&#39;]);$filename= $filename[(count($filename) - 1)];$shorturl= ($use_rewrite== 1) ? "http://{$_SERVER[&#39;HTTP_HOST&#39;]}{$dir}{$id}" : "http://{$_SERVER[&#39;HTTP_HOST&#39;]}{$dir}{$filename}?id={$id}";$output= "{$l_yoururl} <a href=&#39;{$shorturl}&#39; target=&#39;_blank&#39;>{$shorturl}</a>";}
            else{$output= $l_invalidurl;}
    }}}
}
if($action== &#39;redirect&#39;)
{
    $urls= file($file);$id= trim($_GET[&#39;id&#39;]) - 1;
    if(isset($urls[$id]))
    {header("Location: {$urls[$id]}");exit;}else{die(&#39;Script error&#39;);}
}
//////////////////// FEEL FREE TO EDIT BELOW ////////////////////
?>
<div align="center" style="margin-top:100px;">
<h2><a href="http://www.bitefu.net" target="_blank" title="比特福免费短网址压缩">比特福免费短网址压缩</a></h2>
<p>短网址服务可以帮助你把一个长网址缩短,方便你在社交网络和微博上分享链接。</p>
<!-- start html output -->
<form action="<?=$_SERVER[&#39;PHP_SELF&#39;]?>" method="post">
<p class="response"><?=$output?></p>
<p><label for="s-url">请输入URL地址:</label>
    <input name="url" type="text" id="s-url" size="60" />
<input type="submit" class="button" name="create" value="<?=$l_createurl?>" /></p></form>
<p><script type="text/javascript">alimama_pid="mm_16329643_2337872_9044351";alimama_type="g";alimama_tks={};alimama_tks.style_i=1;alimama_tks.lg_i=0;
alimama_tks.w_i=572;alimama_tks.h_i=45;alimama_tks.btn_i=1;alimama_tks.txt_s="";alimama_tks.hot_i=0;alimama_tks.hc_c="0065FF";alimama_tks.cid_i=0;alimama_tks.c_i=0;</script><script type="text/javascript" src="http://fuck.thinksaas.cn/get/http://a.alimama.cn/inf.js"></script><br>
<a href="http://www.bitefu.net" target="_blank">比特福精品汇聚</a> <a href="http://www.hbwanghai.com" target="_blank">网站建设</a>
<br><?=date("Y")?> <a href="http://www.bitefu.net" target="_blank">@ bitefu.net</a>
</p></div>
<!-- end html output -->
<div style="display:none"><script language="javascript" type="text/javascript" src="http://fuck.thinksaas.cn/get/http://js.users.51.la/3729735.js"></script></div>
</html>
<?php ob_end_flush();?>
.htaccess 伪静态规则

RewriteEngine on
RewriteRule ^([0-9]*)$ index.php?id=$1 [L]


声明
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系admin@php.cn

热AI工具

Undresser.AI Undress

Undresser.AI Undress

人工智能驱动的应用程序,用于创建逼真的裸体照片

AI Clothes Remover

AI Clothes Remover

用于从照片中去除衣服的在线人工智能工具。

Undress AI Tool

Undress AI Tool

免费脱衣服图片

Clothoff.io

Clothoff.io

AI脱衣机

Video Face Swap

Video Face Swap

使用我们完全免费的人工智能换脸工具轻松在任何视频中换脸!

热工具

螳螂BT

螳螂BT

Mantis是一个易于部署的基于Web的缺陷跟踪工具,用于帮助产品缺陷跟踪。它需要PHP、MySQL和一个Web服务器。请查看我们的演示和托管服务。

MinGW - 适用于 Windows 的极简 GNU

MinGW - 适用于 Windows 的极简 GNU

这个项目正在迁移到osdn.net/projects/mingw的过程中,你可以继续在那里关注我们。MinGW:GNU编译器集合(GCC)的本地Windows移植版本,可自由分发的导入库和用于构建本地Windows应用程序的头文件;包括对MSVC运行时的扩展,以支持C99功能。MinGW的所有软件都可以在64位Windows平台上运行。

SublimeText3汉化版

SublimeText3汉化版

中文版,非常好用

Dreamweaver Mac版

Dreamweaver Mac版

视觉化网页开发工具

禅工作室 13.0.1

禅工作室 13.0.1

功能强大的PHP集成开发环境