Hallo,

ich suche eine M�glichkeit, am Server eine csv-Datei zu erzeugen, diese dann
vom Server zu holen und lokal in einer mdb Datei zu speichern, um sie dann
dort weiterzuverarbeiten. Dies funktionert auch ohne Probleme, leider nur
bei mir zu Hause am Rechner. Auf dem Firmenrechner, wo ich dies letztlich
brauche, geht es nicht. Dort habe ich Probleme, mir die Datei vom
Online-Server zu holen. Es ist das gleiche Script, die gleiche
Vorgehensweise, die gleiche Klasse, die gleichen Pfade, die ich auch zu
Hause verwende.

Hole ich mir dort das File �ber http://localhost/pfad/database/presse.csv,
funktioniert das dort auch, nur ich kann sie nicht online abrufen. Es kommt
dort auch keine Fehlerbeschreibung nur die Meldung 0 -

Auf dem Firmenrechner ist windowsScript 5.6 installiert und im Norton habe
ich script-block abgestellt.

Woran k�nnte es liegen, dass dies zu Hause ohne Probs funktioniert und auf
dem Firmenrechner nicht.

Hier mal der Scriptcode, um die Datei abzurufen und zu speichern.

Gr��e, Gudula

<%
   Option Explicit

      %><!--#include file="klasse.asp"--><%

   Dim objHTTP
   Dim objFS
   Dim objFile
   Dim strFileName
   Dim strFileContent

   Set objHTTP = New clsHTTPHandler

   objHTTP.Method = cbMethodGET
   objHTTP.URL = "http://www.domain.de/pfad/database/presse.csv";
   objHTTP.SetTimeOuts 2000, 2000, 15000, 30000

   If objHTTP.Retrieve Then
      strFileContent = objHTTP.TransformText(objHTTP.ResponseBody)
      Set objFS = CreateObject("Scripting.FileSystemObject")
    Set objFile = objFS.CreateTextFile(Server.MapPath(_
         "./database/presse.csv"), True)
      objFile.Write strFileContent
      objFile.Close
      Set objFile = Nothing
   Response.write "File �bertragen<br>"
    Else
      Response.Write Err.Number & " - " & Err.Description
   End If
      Set objHTTP = Nothing
   %>

_______________________________________________
Coffeehouse Mailingliste, Postings senden an:
[EMAIL PROTECTED]
An-/Abmeldung und Suchfunktion unter:
http://www.glengamoi.com/mailman/listinfo/coffeehouse

Antwort per Email an