ASP probleempje

[anoniem]

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() %>

[anoniem]

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

[anoniem]

[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 ]