000
04.04.2003, 15:05 Uhr
~0413
Gast
|
Kann mir vielleicht jemand mit ein bisschen mehr Programmiererfahrung helfen. Ich versuche eine Verbindung eines Programms zu einem Webserver über das Internet herzustellen und dort dann auf eine Datei zuzugreifen. Leider scheitere ich schon bei den einfachsten Sachen und schaffe es noch nicht mal eine Verbindung irgendwohin herzustellen. Mittlerweile habe ich an die 20 Tutorials und betsimmt 10 Foren durchgesucht und probiert und komme einfach nicht weiter.
Da die meisten Anleitungen für Linux sind und ich mit Windows 2000 arbeiten muss erschwert sich die Sache für mich ungemein.
Vielleicht kann mir ja jemand helfen. Ich wäre für ein weiteres Tutorial, Ebooks oder vielleicht ein kleines Skript wirklcih sehr dankbar weil ich langsam aufgeben muss.
Ich gebe euch mal meinen letzten Versuch der leider nicht funktioniert wegen Mangel an elementeren Programmierkenntnissen.
Ist vom C++ Builder 4. 0
| C++: |
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <winsock.h>
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
SOCKET s;
const struct sockaddr_in addr;
s = socket(AF_INET, SOCK_STREAM, 0);
if (s == SOCKET_ERROR)
{
Memo1->Lines->Add("socket() failed");
}
addr.sin_addr.s_addr = inet_addr("192.168.100.20");
addr.sin_port = htons(80);
addr.sin_family = AF_INET;
if (connect(s, &addr, sizeof(addr)) == -1)
{
Memo1->Lines->Add("connect() failed");
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
WORD wVersionRequested;
WSADATA wsaData;
int err;
wVersionRequested = MAKEWORD( 2, 0 );
err = WSAStartup( wVersionRequested, &wsaData );
if ( err != 0 )
{
Memo1->Lines->Add("Fehler WinSock DLL.");
}
if ( LOBYTE( wsaData.wVersion ) != 2 || HIBYTE( wsaData.wVersion ) != 0 )
{
Memo1->Lines->Add("Fehler WinSock DLL.");
WSACleanup( );
}
}
//---------------------------------------------------------------------------
|
Danke alleine fürs Anschauen
Dieser Post wurde am 04.04.2003 um 16:55 Uhr von Uwe editiert. |
