Avatar billede l_otto Nybegynder
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... :-(
Avatar billede hansdam Nybegynder
21. januar 2004 - 11:58 #1
Prøv

SQL = "delete * from dbk where PIC_ID = " & StrId
Avatar billede erikjacobsen Ekspert
21. januar 2004 - 11:59 #2
og
  SQL = "delete from dbk where PIC_ID = " & StrId
Men udfører du din sql-sætning?
Avatar billede hansdam Nybegynder
21. januar 2004 - 11:59 #3
Oops - skulle lige være et svar :-D
Avatar billede pfp Nybegynder
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 & "'"
%>
Avatar billede l_otto Nybegynder
21. januar 2004 - 12:03 #5
desværre pfp eller hansdam eller erikj virker ikke ?
Avatar billede hansdam Nybegynder
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
Avatar billede l_otto Nybegynder
21. januar 2004 - 12:12 #7
det er mysql db :-)
Avatar billede hansdam Nybegynder
21. januar 2004 - 12:15 #8
Hmmm ... Det arbejder jeg ikke i.. Sorry
Avatar billede l_otto Nybegynder
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





%>
Avatar billede l_otto Nybegynder
21. januar 2004 - 12:24 #10
vil du have point Hansdam?
Avatar billede hansdam Nybegynder
21. januar 2004 - 15:44 #11
Nej ellers tak, jeg havde jo ikke rigtig fat i det rigtige..., så dem beholder du bare..
Avatar billede l_otto Nybegynder
21. januar 2004 - 15:53 #12
oki...
Avatar billede erikjacobsen Ekspert
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 ;)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester