vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Danke + Frage 
Autor: luet
Datum: 03.07.02 15:55

Es hat nichts mit der Firewall zu tun, sondern ob ich in eine bestehende Online verbindung mich zum FTP-Server verbinde . Mein Win 2000 hat die Angewohnheit ,wenn ich auf dem Button "Verbinden " gehe , keine Online Verbindung mittels DFÜ zu starten. Bei Win 98 / ME startet Winsock automatisch die DFÜ-Verbindung. Ich glaub jetzt funzt es .Manuell hab ich in die Connect -Prozedur eingefügt : s.u.
Frage noch : Wie realisiere ich das Löschen einer Datei auf dem Server mit Winsock ?? Danke für Deine Hilfe und vielleicht könntest Du mir ja noch mal nen Tipp geben !!
Luet

' Anzeige aktualisieren
AddStatus "Verbinden mit " & RemoteHost

RASConnect Me.hWnd

' Verbinden
With CmdSock
.Close
.RemoteHost = RemoteHost
.RemotePort = Port
.Connect
End With
' Warten bis verbunden, oder Timeout eingetreten ist

Private Declare Function InternetDial Lib "wininet.dll" _
(ByVal hwndParent As Long, ByVal lpszConiID _
As String, ByVal dwFlags As Long, ByRef hCon _
As Long, ByVal dwReserved As Long) As Long
Private Const DIAL_FORCE_ONLINE = 1
Private Const DIAL_FORCE_UNATTENDED = 2

Private Function RASConnect(ByVal hWnd As Long, _
Optional ByVal DFÜName As String = "", _
Optional ByVal AutoStart As Boolean = False) As Boolean

Dim conID As Long

InternetDial hWnd, DFÜName, IIf(AutoStart, _
DIAL_FORCE_UNATTENDED, DIAL_FORCE_ONLINE), _
conID, 0

RASConnect = (conID <> 0)
End Function
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
FTP60luet03.07.02 10:54
Re: FTP255ModeratorDieter03.07.02 11:02
Danke + Frage44luet03.07.02 15:55
Re: Danke + Frage221ModeratorDieter03.07.02 19:07
Supiiii30luet03.07.02 20:17

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel