VB6 & MS-SQL 7.0 übers Internet

Computer: Software & Programmierung Visual Basic
1

Hallo zusammen

Ich habe diese Frage hier schon mal vor einiger Zeit gestellt - aber leider keine befriedigende Antwort bekommen. Daher versuche ich’s jetzt nochmals:

Also, ich habe eine funktionierende VB6-Anwendung, welche über ein lokales Netzwerk auf einen MS-SQL-Server zugreift. Soweit funktioniert alles sehr gut.

Nun möchte ich aber, dass die Anwender auch von aussen, via Internet, mit dieser Applikation auf die DB zugreifen können. Dazu habe ich schon mal den Port 1433 geöffnet und versucht mit dem folgenden Connection-String eine Verbindung herzustellen:

"Provider=SQLOLEDB.1; uid=sa; pwd=xxx; " & \_"Initial Catalog=Adressen;" & \_"Data Source=192.192.192.192:1433"

Leider bekomme ich auf diese Art keine Verbindung. Wo liegt der Fehler?

Danke und Gruss
Martin

2

Hallo,

soweit ich mich erinnere brauchst du dazu
die Remote Data Objects ‚RDO‘.

Der Connect müsste so aussehen:

"Provider=MS Remote; uid=sa; pwd=xxx; Initial Catalog=Adressen; Remote Server='http://192.192.192.192:1433'"

Probiers halt mal aus. Bin nicht sicher obs geht.
Hier noch ein MS Beispiel:

http://msdn.microsoft.com/library/en-us/dnuda/html/m…

Gruss

Christoph

3

Hallo Christoph

Danke für Deine Antwort.

Wenn ich das mit Deinem Connection-String mache, dann bekomme ich die folgende Fehlermeldung:

Laufzeitfehler '-2147012865 (80072eff):

Internet Client Error: Connection Reset.

Gruss
Martin

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

4

Nachtrag zu meiner Antwort
leider hab ich den ‚Remote Provider‘ im Connection String vergessen.

Also das ganze muss lauten:

"Provider=MS Remote; Remote Server='http://www.mysite.com'; Remote provider= MSDASQL; DSN=pubs"

Auf Serverseite muss ein DSN Eintrag vorhanden sein.
Es können natürlich noch UID und PWD übergwben werden.

Sorry!

Chris

5

… geht leider auch nicht, jetzt bekomme ich die Fehlermeldung:

Internet Client Error: Invalid Server Response.

Gruss
Martin