also die kommt definitiv ne Stunde zu sp�t, die Mail ;-)
Nicht beachten! ;-))
----- Original Message -----
From: "Jutta Kavalier" <[EMAIL PROTECTED]>
To: "ASP Datenbankprogrammierung" <[EMAIL PROTECTED]>
Sent: Wednesday, February 27, 2002 3:04 PM
Subject: [aspdedatabase] RE: XML in DB bringen
> oops, zu fr�h weggeschickt, sorry ;-)
> nochmal:
>
> sDirectory = "C:\root\ordner\funterordner"
> call getXMLfiles_name(sDirectory)
>
> function getXMLfiles_name(sDirectory)
> Set fso = CreateObject("Scripting.FileSystemObject")
> if fso.FolderExists(sDirectory) then
> Set folder = fso.GetFolder(sDirectory & "\")
> Set files = folder.Files
> iCounter = 0
> For Each file in Files
> sXMLLocation = sDirectory & "\" & file.Name
> sXMLTarget = sDirectory & "\import\" & file.Name
> call importXML(sXMLLocation)
> 'fso.MoveFile sXMLLocation,sXMLTarget
> Next
> End if
> Set files = folder.Files
> Set file = Nothing
> Set fso = Nothing
> end function
>
>
> Function importXML(sXMLLocation)
> Set XMLDoc = CreateObject("Msxml.DOMDocument")
> XMLDoc.async = False
> bSuccess = XMLDoc.load(sXMLLocation)
> Set myNodeID = XMLDoc.getElementsByTagName("id")
> end function
>
>
>
> | [aspdedatabase] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
> | Sie k�nnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp
