kurze frage: wie funktioniert das? du splittest doch 3 mal mit dem komma als parameter... meiner meinung nach d�rfte da schon das 2. splitting nicht mehr funktionieren, weil doch gar kein komma mehr drin ist?
> -----Original Message----- > From: Gudula Schwingenheuer (PTS R. Schnettler) > [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, October 09, 2002 2:16 PM > To: ASP Diskussionsliste fuer Anfaenger > Subject: [aspdebeginners] Verschachtelte Arrays > > > Hallo zusammen, > > ich sitze jetzt schon seit Tagen an dieser Struktur und habe > mich wohl in den Arrays ziemlich verhaspelt. > > Es geht um folgendes: > > Ich m�chte nach einem upload Verzeichnis, lfdNr. und > Dateinamen aus der upgeloadeten Datei auslesen und in der > Datenbank aktualisieren. Die Anzahl der geladenen Dateien ist > unterschiedlich. > > Die Struktur der url ist folgende: > > 1_1_Regelwerke.zip,1_2_Allgemein.zip,...Diese speichere ich > dann in die > Session("gesamt") > > Die ersten beiden Teile sind pk der Tabelle, also 1 1 und 1 2 > der 3. Teil Regelwerke, hier kann ich ja die letzten 4 > Zeichen abziehen, wird als Dateiname gespeichert. Beim update > soll das aktuelle Datum eingef�gt werden und zus�tzlich noch > ein Feld aktualisiert. Der Dateiname ist jetzt allerdings > noch nicht dabei, ich dachte, bevor ich mich jetzt noch > weiter verschachtele, kann mir jemand sagen, ob dies so > richtig ist. Gebe ich die SQL n�mlich aus, l�uft das update > pro Datensatz mehrere Male durch, es funktioniert zwar, aber > das kann doch nicht richtig sein. > > Ich habe dies wie folgt gemacht: > > <% > if Request("ak") = "aktuell" then > dim objConn > Set objConn = Server.CreateObject("ADODB.Connection") > objConn.Open "pub" > dim sql, gesamt, b, i, c, k, myArray, x, myArray1,y > ' --- String auslesen > gesamt = Session("gesamt") > ' --- nach dem Komma splitten > b = split(gesamt,",") > for i = 0 to ubound(b) > ' --- nach dem Unterstrich spltten > c = split(b(i),"_") > for k = 0 to ubound(c) > myArray = split(c(0),",") > myArray1 = split(c(1),",") > For x = 0 to ubound(myArray) > for y = 0 to ubound(myArray1) > SQL = "update pptDateiname set pptDate > = Date(), aktuell = true where pptID=" & myArray(x) & " and > lfdnr=" & myArray1(y) & "" > objConn.Execute( SQL ) > Next > Next > next > Next > objConn.close > set objConn = Nothing > end if > %> > > Ich benutze ein Uploadscript ohne Komponente und muss mir > dies noch zus�tzlich zusammenzimmern. Es w�re wirklich sehr > nett, wenn sich jemand dies mal ansehen k�nnte und mir einen > Tipp geben. > > Herzliche Gr��e, Gudula > > > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ > | [aspdebeginners] als [EMAIL PROTECTED] subscribed > | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv Sie > | knnen sich unter folgender URL an- und abmelden: > | > http://www.aspgerman.com/aspgerman/listen/anme> lden/aspdebeginners.asp > | Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/ | [aspdebeginners] als [email protected] subscribed | http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv | Sie knnen sich unter folgender URL an- und abmelden: | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
