PHP翻译成易语言谁可以

TianGG · 发表于 2023-6-3 23:35:30

<?php
require_once 'Ip2Region.php';

function getCurrentUrl() {
$protocol = isset($_SERVER['HTTPS']) && $_SERVER['HTTPS'] === 'on' ? "https" : "http";
$domain = $_SERVER['HTTP_HOST'];
$uri = strtok($_SERVER["REQUEST_URI"], '?');
return $protocol . "://" . $domain . $uri;
}

if (!empty($_GET['ip']) && filter_var($_GET['ip'], FILTER_VALIDATE_IP)) {
$ip = $_GET['ip'];
} else {
$ip = $_SERVER['REMOTE_ADDR'];
}

$obj = new Ip2Region();
$result = $obj->simple($ip);

if (!empty($result)) {
echo $result;
} else {
echo "抱歉，没有找到结果。";
}

if (empty($_GET['ip'])) {
$url = getCurrentUrl() . "?ip=" . $ip;
echo sprintf(" | 请求访问如：%s", $url);
}
?>

PHP翻译成易语言谁可以