
15.04.2009, 15:50
|
|
Новичок
Регистрация: 20.03.2009
Сообщений: 13
Провел на форуме: 7458
Репутация:
0
|
|
Доброго времени суток!!!
У меня такая проблема, необходимо через Wininet настроить подключение от клиента к серверу (используя аутентификацию) и дальнейшую загрузку файлов с сервера.
Делаю так:
Код:
function GetInetFile
(const fileURL, FileName: String): boolean;
const BufferSize = 1024;
var
hSession, hURL: HInternet;
Buffer: array[1..BufferSize] of Byte;
BufferLen,mnb: DWORD;
f: File;
sAppName: string;
begin
Result:=False;
sAppName := ExtractFileName(Application.ExeName);
hSession := InternetOpen(PChar(sAppName),INTERNET_OPEN_TYPE_PROXY,PIInfo^.lpszProxy,nil,0);
Dispose(PIInfo);
try
hURL := InternetOpenURL(hSession, PChar(fileURL), nil,0,0,0);
try
AssignFile(f, FileName);
Rewrite(f,1);
repeat
InternetReadFile(hURL, @Buffer, SizeOf(Buffer), BufferLen);
BlockWrite(f, Buffer, BufferLen)
until BufferLen = 0;
CloseFile(f);
Result:=True;
finally
InternetCloseHandle(hURL)
end
finally
InternetCloseHandle(hSession)
end
end;
procedure TForm1.ConnectButtonClick(Sender: TObject);
var
i,k:integer;
old_date,ftp_name,ftp_name1,save_name:string;
Flags, TargetFrameName, PostData, Headers: OleVariant;
FileOnNet, LocalFileName: string;
begin
FileOnNet:='http://trulala.ru/lala/123.txt';
LocalFileName:='123.txt';
if GetInetFile(FileOnNet,LocalFileName)=True then
ShowMessage('Файл загружен')
else
ShowMessage('Ошибка загрузки файла')
Все работает нормально при подключенном Траффик испекторе (программу пишу на работе), когда его выключаешь, программа записывает в файл строки с содержимым HTML-кода, вроде того, что требуется аутентификация на сервере.
Помогите пожалуйста.
Заранее благодарен.
|
|
|

15.04.2009, 16:37
|
|
Познающий
Регистрация: 27.09.2008
Сообщений: 57
Провел на форуме: 265628
Репутация:
23
|
|
Доброго времени суток, такой вопрос (С++):
Как можно реализовать решение системы уравнений вида:
С1 + С2 = d
a*С1 + b*С2 = e
В ней меняются коэффициенты a, b и d,e причем d,e либо 0 либо 1.
Немогу сообразить как ее программно оформить)
Нужно получить С1 и С2
|
|
|

15.04.2009, 17:02
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Как то так, если я нигде не накосячил
Код:
#include <iostream.h>
void main()
{
float a,b,d,e;
cout<<"A: ";
cin>>a;
cout<<"B: ";
cin>>b;
cout<<"D: ";
cin>>d;
cout<<"E: ";
cin>>e;
float d1 = b-a;
float d2 = d*b-e;
float d3 = e-a*d;
cout<<"C1 = "<<d2/d1<<"; C2="<<d3/d1;
}
|
|
|

15.04.2009, 17:34
|
|
Новичок
Регистрация: 12.03.2009
Сообщений: 18
Провел на форуме: 102976
Репутация:
2
|
|
дайте ссылки на то, что можно почитать, чтобы обучиться с++ с полного нуля, вообще с полного. То есть нужна инфа с начального курса до проффессионала.
|
|
|

15.04.2009, 20:16
|
|
Участник форума
Регистрация: 09.08.2008
Сообщений: 139
Провел на форуме: 560332
Репутация:
15
|
|
Сообщение от 4prazd
дайте ссылки на то, что можно почитать, чтобы обучиться с++ с полного нуля, вообще с полного. То есть нужна инфа с начального курса до проффессионала.
не проффесионал, но я читаю Объектно Ориентированное Программирование Си++ . Роберт Лафоре. У меня в бумажном варианте. Издатель Питер.
|
|
|

15.04.2009, 18:23
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
У меня вот какой вопрос. Вот допустим у меня в папке лежит файл text.txt и в этой же папке исходники проги на С. Как можно сделать, чтобы при выполнении программы текст из text.txt перешёл в переменную
char text
Код:
#include <stdio.h>
#include <stdlib.h>
void main()
{
FILE *in = fopen("file.txt", "r");
fseek(in, 0L, SEEK_END);
long end = ftell(in);
char *text;
text = (char *) malloc(end);
fseek(in, SEEK_SET, 0);
fread(text, end, 1, in);
fclose(in);
}
|
|
|

15.04.2009, 20:17
|
|
Участник форума
Регистрация: 09.08.2008
Сообщений: 139
Провел на форуме: 560332
Репутация:
15
|
|
Как можно узнать , какие библиотеки использует .exe ?
|
|
|

15.04.2009, 20:54
|
|
Познающий
Регистрация: 11.03.2009
Сообщений: 70
Провел на форуме: 251358
Репутация:
6
|
|
Можно мониторами апи функций(типа Filemon или т.п.), а также дебагерами(типо ольги) и IDEшками ну и т.д.т.п.
|
|
|

17.04.2009, 11:57
|
|
Новичок
Регистрация: 20.03.2009
Сообщений: 13
Провел на форуме: 7458
Репутация:
0
|
|
Доброго времени суток!
Подскахите пожалуйста, как с помощю idHTTP и idFTP скачать файл с прокси сервера, используя аутентификацию. Срочно нужно. Буду очень признателен.
Заранее благодарен!!!
|
|
|

17.04.2009, 22:25
|
|
Участник форума
Регистрация: 20.02.2009
Сообщений: 224
Провел на форуме: 5075819
Репутация:
274
|
|
Подскажите как просмотреть ресурсы в exe-файле! может у кого есть какие исходники?
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|