Błąd podczas pobierania danych ze strony
Napisane: czwartek, 27 lutego 2014, 14:59
Witam
Problem dotyczy http://programowanie.cal.pl/cyfbar/siec.html#siec10, a mianowicie pobieram dane z jednej strony i chcę żeby przeszło mi na nową stronę, to mimo iż adres url jest poprawny to nie pobiera danych z nowej strony, tylko nadal pobiera z pierwszej strony dane
Dodam tylko iż dla potrzeb Embarcadero musiałem zmienić typy zmiennych na w_str
Problem dotyczy http://programowanie.cal.pl/cyfbar/siec.html#siec10, a mianowicie pobieram dane z jednej strony i chcę żeby przeszło mi na nową stronę, to mimo iż adres url jest poprawny to nie pobiera danych z nowej strony, tylko nadal pobiera z pierwszej strony dane
Dodam tylko iż dla potrzeb Embarcadero musiałem zmienić typy zmiennych na w_str
KOD cpp: UKRYJ
AnsiString TMain::ReadFileURL(String Url)
{
AnsiString result = "";
HINTERNET hSession = NULL;
hSession = InternetOpen(L"ReadFileURL", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0);
if (hSession)
{
HINTERNET hService = NULL;
hService = InternetOpenUrl(hSession, Url.w_str(), NULL, 0, 0, 0);
if (hService)
{
while (1)
{
char lpBuffer[1024 + 1];
DWORD dwBytesRead;
InternetReadFile(hService, lpBuffer, 1024, &dwBytesRead);
if (dwBytesRead == 0)
break;
lpBuffer[dwBytesRead] = 0;
result += lpBuffer;
}
}
InternetCloseHandle(hService);
}
InternetCloseHandle(hSession);
return result;
}
{
AnsiString result = "";
HINTERNET hSession = NULL;
hSession = InternetOpen(L"ReadFileURL", INTERNET_OPEN_TYPE_DIRECT, 0, 0, 0);
if (hSession)
{
HINTERNET hService = NULL;
hService = InternetOpenUrl(hSession, Url.w_str(), NULL, 0, 0, 0);
if (hService)
{
while (1)
{
char lpBuffer[1024 + 1];
DWORD dwBytesRead;
InternetReadFile(hService, lpBuffer, 1024, &dwBytesRead);
if (dwBytesRead == 0)
break;
lpBuffer[dwBytesRead] = 0;
result += lpBuffer;
}
}
InternetCloseHandle(hService);
}
InternetCloseHandle(hSession);
return result;
}