21. januar 2004 - 11:53
Der er
12 kommentarer og 1 løsning
hvorfor vil den ikke slette?
<%StrId = request.querystring("PIC_ID")%> <% set rsComment = Server.CreateObject("ADODB.Recordset") rsComment.ActiveConnection = MM_connDUpics_STRING rsComment.Source = "SELECT * FROM dkb " rsComment.CursorType = 0 rsComment.CursorLocation = 2 rsComment.LockType = 3 rsComment.Open() rsComment_numRows = 0 SQL ="delete * from dbk where PIC_ID like '" & StrId & "'" %> der sker ikke en skid... :-(
Annonceindlæg fra Barco
21. januar 2004 - 11:58
#1
Prøv SQL = "delete * from dbk where PIC_ID = " & StrId
21. januar 2004 - 11:59
#2
og SQL = "delete from dbk where PIC_ID = " & StrId Men udfører du din sql-sætning?
21. januar 2004 - 11:59
#3
Oops - skulle lige være et svar :-D
21. januar 2004 - 11:59
#4
Prøv: <%StrId = request.querystring("PIC_ID")%> <% set rsComment = Server.CreateObject("ADODB.Recordset") rsComment.ActiveConnection = MM_connDUpics_STRING rsComment.Source = "SELECT * FROM dkb " rsComment.CursorType = 0 rsComment.CursorLocation = 2 rsComment.LockType = 3 rsComment.Open() rsComment_numRows = 0 SQL ="delete from dbk where PIC_ID like '" & StrId & "'" %>
21. januar 2004 - 12:03
#5
desværre pfp eller hansdam eller erikj virker ikke ?
21. januar 2004 - 12:09
#6
Hmmm, så prøv dette.. Det er godt nok en lidt anden måde at oprette forbindelse til din DB, men jeg tror det virker.. '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' StrId = request.querystring("PIC_ID") Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("**Databasenavn**.mdb") strSQL = "Delete * From dbk Where PIC_Id = " & StrId Set rs = Conn.Execute(strSQL) conn.close set conn = nothing
21. januar 2004 - 12:12
#7
det er mysql db :-)
21. januar 2004 - 12:15
#8
Hmmm ... Det arbejder jeg ikke i.. Sorry
21. januar 2004 - 12:23
#9
løste den selv: <% set rsComment = Server.CreateObject("ADODB.Recordset") rsComment.ActiveConnection = MM_connDUpics_STRING rsComment.Source = "delete From dkb Where PIC_Id = " & Cint(Request.Querystring("PIC_id")) rsComment.CursorType = 0 rsComment.CursorLocation = 2 rsComment.LockType = 3 rsComment.Open() rsComment_numRows = 0 %>
21. januar 2004 - 12:24
#10
vil du have point Hansdam?
21. januar 2004 - 15:44
#11
Nej ellers tak, jeg havde jo ikke rigtig fat i det rigtige..., så dem beholder du bare..
21. januar 2004 - 15:53
#12
oki...
21. januar 2004 - 18:25
#13
Du behøver ikke den cint, men det er da rart det virker når du nu rent faktisk udfører din sql-sætning ;)
Kurser inden for grundlæggende programmering