Delphi Подключение из приложения под Андроид PHP script к удаленной БД сайта MySQL

Lomanu4 · 3 Фев 2019

[POSTS=1000]

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Text := NetHTTPClient1.Get('http://www.domofonkg.com/1.php?id=1').ContentAsString(TEncoding.ANSI);

Код:

<?php
//Sample Database Connection Syntax for PHP and MySQL.

//Connect To Database

$hostname="176.126.167.134";
$username="mmmmmmmmmm";
$password="000000000000";
$dbname="domofonkg";
$usertable="internetshop_users";
$yourfield = "mail_index"; //лицевой счет
$yourfield1 = "address_of_delivery"; //адрес
$yourfield2 = "fax";  //тариф
$yourfield3 = "country_id"; //абонплата
$yourfield4 = "url"; //льгота
$yourfield5 = "phone"; //долг
$yourfield6 = "company"; //статус
$yourfield7 = "icq"; //дата
$zapros = $_GET['id'];

$link = mysql_connect($hostname,$username, $password) or die ("<html><script language='JavaScript'>alert('Ошибка соединения с базой! Пожалуйста попробуйте позже.'),history.go(-1)</script></html>");
mysql_set_charset('cp1251',$link);// твоя кодировка, чтобы сервер тебя  правильно понял
mysql_select_db($dbname);

# Check If Record Exists

$query = "SELECT mail_index, address_of_delivery, fax, country_id, url, phone, company, icq FROM $usertable WHERE $yourfield = $zapros";

$result = mysql_query($query);

if($result)
{
 while($row = mysql_fetch_array($result, MYSQL_ASSOC))
 {
   printf ("%s; %s; %s; %s; %s; %s; %s; %s", $row["$yourfield"], $row["$yourfield1"], $row["$yourfield2"], $row["$yourfield3"], $row["$yourfield4"],   $row["$yourfield5"], $row["$yourfield6"], $row["$yourfield7"]);
 }
 mysql_free_result($result);
}
?>

[/POSTS]

Lomanu4 · 3 Фев 2019

mysql_set_charset('cp1251',$link);// твоя кодировка, чтобы сервер тебя правильно понял
<?php
header('Content-Type: application/json; charset=utf-8');
[HIDE=1000]

PHP:

<?php
header('Content-Type: application/json; charset=utf-8');

$DBHost = "176.126.167.134";
$DBUser = "mmmmmmmmmm";
$DBPassword = "000000000000";
$DBase = "domofonkg";
$DBTable = "internetshop_users";

if (isset($_GET['id'])) {
    $zapros = $_GET['id'];
} esle {
    exit('{ "status" : "нет параметра запроса"}');
}

$DBLink = mysqli_connect($DBHost, $DBUser, $DBPassword, $DBase);
if (!$DBLink) {
  return("<html><script language='JavaScript'>alert('Ошибка соединения с базой! Пожалуйста попробуйте позже.'),history.go(-1)</script></html>");
}
$zapros = mysqli_real_escape_string($DBLink, $zapros);

$query = "SELECT mail_index, address_of_delivery, fax, country_id, url, phone, company, icq FROM $DBTable WHERE mail_index = $zapros";

if ($DBResult = mysqli_query($DBLink, $query)) {
    $ResultArray = array();
    $Index = 0;
    while($row = mysqli_fetch_array($DBResult, MYSQLI_ASSOC);) {
        $ResultArray[$Index] = $row;
        $Index++;   
    }
    $ResultJSON = json_encode($ResultArray, JSON_PRETTY_PRINT | JSON_UNESCAPED_UNICODE);
    echo $ResultJSON;
    mysqli_free_result($DBResult);
}
mysqli_close($DBLink);

[/HIDE]

Delphi Подключение из приложения под Андроид PHP script к удаленной БД сайта MySQL

Lomanu4

Lomanu4