myAdBanner

2021年9月4日 星期六

解決JS沒辦法取得CORS(跨網域存取)資料的方法

<script>

var ltnUrl= 'https://cors.bridged.cc/https://search.ltn.com.tw/list?keyword=蔡英文';


//1.聲明異步請求對象:
var xmlHttp = new XMLHttpRequest();
xmlHttp.open("get", ltnUrl, true);
xmlHttp.send();
xmlHttp.onreadystatechange = doResult; //設置回調函數                 

function doResult() {
    var content = xmlHttp.responseText;
  var GetItem= content.return_between('<ul class="list boxTitle" data-desc="列表">','</ul>','excl');
  var GetItemArr=new Array();
  GetItemArr=GetItem.parse_array('<li>','</li>');
    var GetItemArrCount=0;
    if ( GetItemArr != null ) {    GetItemArrCount=GetItemArr.length;    }
    var GetTitle=new Array(); //標題
    var GetUrl=new Array();   //網址
    var GetDateTime=new Array();//時間
    var GetIntro=new Array(); //簡述
    var GetPicOK=new Array();   //圖片
    var GetTitleOK=new Array(); //標題
    var GetUrlOK=new Array();   //網址
    var GetDateTimeOK=new Array();//時間
    var GetIntroOK=new Array(); //簡述
    var j=0;
    
  for ($i=0; $i< GetItemArrCount; $i++) {
      GetTitle[$i]=GetItemArr[$i].get_attribute('alt');
      console.log(GetTitle[$i]);

    }
}


</script>

2021年8月23日 星期一

utf8 計算字數

 計算字數 utf8


if (!function_exists('mb_str_word_count'))

{

    function mb_str_word_count($string, $format = 0, $charlist = '[]') {

        mb_internal_encoding( 'UTF-8');

        mb_regex_encoding( 'UTF-8');


        $words = mb_split('[^\x{0600}-\x{06FF}]', $string);

        switch ($format) {

            case 0:

                return count($words);

                break;

            case 1:

            case 2:

                return $words;

                break;

            default:

                return $words;

                break;

        }

    };

}

2019年9月7日 星期六

PHP 讀取中文檔名錯誤

解決方法
$filename = "word/1-1/1-1-1000517-1-中文檔名.txt";
 //對檔名的編碼,避免中文檔名亂碼
$pagename = iconv("UTF-8", "BIG-5", $filename);

2019年3月4日 星期一

DOS BAT 取得日期 星期

@ECHO off
SETLOCAL
rem chcp 437

REM 取得日期
for /F "tokens=1-4 delims=/ " %%a IN ("%date%") DO (
set _year=%%a
set _month=%%b
set _day=%%c
set _week=%%d
set _today=%%a%%b%%c
)

echo %_week%
echo %_today%
pause
EXIT
ENDLOCAL

2018年4月11日 星期三

判斷來源網址


<script type="text/javascript">
if(window.name != 'ad_app6'){
var r = document.referrer;
r = r.toLowerCase(); //轉為小寫
var aSites = new Array('google.','baidu.','sm.','soso.','so.','360.','yahoo.','youdao.','sogou.','gougou.');
var b = false;
for (i in aSites){
if (r.indexOf(aSites[i]) > 0){
b = true;
break;
}
}
if(b)
{
self.location = '要跳轉的網址';
window.adworkergo = 'ad_app6';
}
}
</script>

2018年3月31日 星期六

利用程式刪除遠端FTP站台的檔案

<?php

if ( isset($_POST['dirname']) ) 
{
 
 echo $dir_name = $_POST['dirname'];
 if ( is_file( $dir_name ) )
 {
         if ( unlink($dir_name) )  echo "Del file \"$dirname\" successfully!
"; else echo "Fail to del file \"$dirname\"!
"; } else { CleanDir($dir_name); if ( rmdir($dir_name) ) echo "Remove dir \"$dirname\" successfully!
"; else echo "Fail to Remove dir \"$dirname\"!
"; } } function CleanDir($dir) { $handle=opendir($dir); while ( $file=readdir($handle) ) { if ( ($file==".") || ($file=="..") ) continue; if ( is_dir("$dir/$file") ) { CleanDir("$dir/$file"); if ( rmdir("$dir/$file") ) echo "Remove dir \"$dir/$file\" successfully!
"; else echo "Fail to Remove dir \"$dir/$file\"!
"; } else { if ( unlink("$dir/$file") ) echo "Del file \"$dir/$file\" successfully!
"; else echo "Fail to del file \"$dir/$file\"!
"; } } closedir($handle); } ?> 無標題文件
想要刪除的文件或資料夾: