24. september 2002 - 02:23
Der er
8 kommentarer og 1 løsning
hvodan er det jeg får vist
Hejsa Hvordan er det jeg får vist de records som jeg netop har sat ind? jeg har en formular hvor jeg har mulighed for at uploade nogle filer. filerne uploades og sti osv lægges i db. hvordan er det jeg kan få vist de records jeg har skrevet til DB? hvis det kun er 3 ud af 5 filer det er lykkedes at skrive til db vil jeg gerne have at brugeren får at vide at de og de records er blevet oprettet.. -- xs
Annonceindlæg fra Computerworld
24. september 2002 - 08:12
#1
Find ud af hvor mange records det drejer sig om, og Lav en TOP() funktion! lngAntal = 12 strSQL = "SELECT TOP " & lngAntal & " FROM tabel" Set objRs = objConn.Execute(strSQL) //>Rune
24. september 2002 - 10:39
#2
ved hver insert - lav en select @@identity. Put dine id'er i et array.
24. september 2002 - 14:39
#3
jeg ved netop ikke hvor mange records der bliver skrevet...
25. september 2002 - 00:51
#4
Jammen du skriver vel en record ad gangen. Så i det stykke kode hvor du skriver recorden tjekker du om det er gået godt og får id'et på recorden tilbage ved at lave en select @@identity.
25. september 2002 - 02:27
#5
kan du giv mig et eksempel på hvordan det skal se ud? jeg kan nemlig ikke få det til at virke. her er koden jeg bruger: SQL = "INSERT INTO billeder(filename, filepath, filesize, width, height, descr, filetype, uploaddate, uploadtid) VALUES(" SQL = SQL & "'" & File.Filename & "', " SQL = SQL & "'" & File.Path & "', " SQL = SQL & "'" & File.Size & "', " SQL = SQL & "'" & File.ImageWidth & "', " SQL = SQL & "'" & File.ImageHeight & "', " SQL = SQL & "'" & descr & "', " SQL = SQL & "'" & File.ImageType & "', " SQL = SQL & "#" & uploaddate & "#, " SQL = SQL & "#" & uploadtid & "#" SQL = SQL & ");" 'IF descr = "" THEN ' Upload.DeleteFile File.Path 'END IF ' Save to database File.ToDatabase Connect, SQL Set rs = Server.CreateObject("ADODB.RecordSet") SQL = "SELECT @@identity AS succesLog FROM billeder" rs.open SQL, Connect Do While Not rs.EOF succesLog = rs("succesLog") rs.movenext Loop gemteFiler = gemteFiler & "<BR>" & succesLogs strFiles = strFiles & File.Filename & "<BR>"
25. september 2002 - 04:31
#6
ved du om man kan bruge @@identity i Access? eller skal det være MySQL?
25. september 2002 - 04:32
#7
den skriver nemlig 0 til dem allesammen
25. september 2002 - 14:45
#8
man kan godt bruge den med access hvis man bruger Jet driveren...
26. september 2002 - 08:05
#9
Jep .. @@identity virker i Access med Jet driveren, kender detsvære ikke så meget til andre access drivere :-(
Kurser inden for grundlæggende programmering