anoniem Geplaatst: 12 mei 2002 Delen Geplaatst: 12 mei 2002 Hallo, ik heb de volgende aspcode, maar als ik deze uitvoer krijg is de melding "500, internal server error" er staan schrijfrechten op de database. <!--#include file="../Connections/conn.asp" --> <% set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_conn_STRING Recordset1.Source = "SELECT * FROM foto" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 3 Recordset1.Open() Recordset1_numRows = 0 %> <% dim filenaam dim pad filename = test.jpg pad = "filepad" if filename<>"" then pad = pad & filename Recordset1.addnew Recordset1("pad").value = pad Recordset1("naam").value = filename Recordset1.update end if %> <% Recordset1.Close() %> Quote Link naar reactie
anoniem Geplaatst: 12 mei 2002 Auteur Delen Geplaatst: 12 mei 2002 Een 500 error zegt niet zoveel. Zet eens de optie "Show friendly HTTP errors" uit in je browser (tools >> internet options >> advanced) dan krijg je waarschijnlijk een wat duidelijkere melding. Als je overigens zoekt op de foutmelding (bijv op onderstaande sites) vind je bijna altijd wel een antwoord. http://www.google.com http://msdn.microsoft.com http://support.microsoft.com Quote Link naar reactie
anoniem Geplaatst: 12 mei 2002 Auteur Delen Geplaatst: 12 mei 2002 [quote:f70e5885f2] Op 12-05-2002 17:49 schreef Sitskoorn: Hallo, ik heb de volgende aspcode, maar als ik deze uitvoer krijg is de melding "500, internal server error" er staan schrijfrechten op de database. <!--#include file="../Connections/conn.asp" --> <% set Recordset1 = Server.CreateObject("ADODB.Recordset") Recordset1.ActiveConnection = MM_conn_STRING Recordset1.Source = "SELECT * FROM foto" Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 3 Recordset1.Open() Recordset1_numRows = 0 %> <% dim filenaam dim pad filename = test.jpg pad = "filepad" if filename<>"" then pad = pad & filename Recordset1.addnew Recordset1("pad").value = pad Recordset1("naam").value = filename Recordset1.update end if %> <% Recordset1.Close() %> [/quote:f70e5885f2] Recordset1.Open() ??? Die haakjes ken ik niet. Maar dat zegt niet veel want je kunt op veel manieren omgaan met ASP filename = test.jpg ???? Ken ik ook niet maar goed, even aangenomen dat het kan. Knip en plak de onderstaande code, en je foutmelding is weg: ---------------------- <!-- #include file="../Connections/conn.asp" --> <% filename = test.jpg pad = "filepad" if filename<>"" then pad = pad & filename Set RS = Server.CreateObject( "ADODB.RecordSet" ) sqlString = "SELECT * FROM foto WHERE 1 <> 1" RS.ActiveConnection = Con RS.LockType = adLockOptimistic RS.Open sqlString RS.AddNew RS( "pad" ) = pad RS( "naam" ) = filename RS.Update RS.Close end if %> [ Dit bericht is bewerkt door: Wiep Corbier op 2002-05-13 01:18 ] Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen