Archief - ASP.Net : Delete record

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
R

Rutger

Legacy Member
Ik voer deze code uit bij het klikken op ene knop...

Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source=" & Server.MapPath("Website.mdb")

Dim objCn As New OleDb.OleDbConnection(connectionString)
objCn.Open()

Dim strSQL As String = "DELETE FROM Documentengroep WHERE DocLink = '" & lstGroep1.SelectedValue & "';"

Dim objCmd As New OleDb.OleDbCommand(strSQL, objCn)


Maar iets schijnt er niet te kloppen want er wordt nix verwijdert. Iemand met wat kennis van ASP.net die me kan helpen?
Dit moet toch niet met een TRY - Catch he, ik dacht toch dat dat alleen voor foutopsporing was.
B

Boddah

Legacy Member
rekening gehouden met de postback?
wanneer je iets selecteert in een listbox (ik vermoed dat lstGroep1 er één is), en op een knop klikt, wordt de Page_Load method terug aangeroepen, en worden selecties zoals in een listbox ongedaan gemaakt.
o

orez

Legacy Member
ge moet uwen command nog uitvoeren eh...


objCn.Open
objcmd.executenonquery()
objCn.Close

en ook ni vergeten postbak aan te zetten...
R

Rutger

Legacy Member
ru`orez zei:
ge moet uwen command nog uitvoeren eh...


objCn.Open
objcmd.executenonquery()
objCn.Close

en ook ni vergeten postbak aan te zetten...
Klik om te vergroten...


Ok, da was het dus, heel hard bedankt ru'orez!!!

PS : het is dan wel gedelete uit men database, maar dan staat da zo nog wel fkes in dien dropdownlist tot ge die pagina de volgende keer opendoet..

Moet ik dan ne Refresh ofzo doen?
o

orez

Legacy Member
Rutger zei:
Ok, da was het dus, heel hard bedankt ru'orez!!!

PS : het is dan wel gedelete uit men database, maar dan staat da zo nog wel fkes in dien dropdownlist tot ge die pagina de volgende keer opendoet..

Moet ik dan ne Refresh ofzo doen?
Klik om te vergroten...

doet ne response.redirect naar dezelfde pagina :)
R

Rutger

Legacy Member
ru`orez zei:
doet ne response.redirect naar dezelfde pagina :)
Klik om te vergroten...

Ook een optie ;-)

En Update Query macheert nu ook niet meer.. Ziet der volledig correct uit, maar wss zal der wel iets verkeerd aan zijn :)
Wel kut, ik moet een eindwerk maken in asp.net, maar krijgen daar bijna geen les over, veel draait bij ons om java en VB 6.0

Dit is code van Update query, mis dat jij het vindt ru'orez

Dim strTekst As String
Dim strTitel As String
Dim strPoster As String
Dim strGroepnaam As String

strGroepnaam = "Groep " & Session("intPrivilege")
strTitel = txtTitel.Text
strTekst = txtTekst.Text
strPoster = txtPoster.Text

Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source=" & Server.MapPath("Website.mdb")

Dim objCn As New OleDb.OleDbConnection(connectionString)
objCn.Open()

Dim strSQL As String = "UPDATE Documentengroep SET Groepnaam=strGroepnaam,DocLink=strTitel,DocTekst=strTekst,Poster=strPoster WHERE DocLink = '" & lstGroep1.SelectedValue & "';"
Dim objCmd As New OleDb.OleDbCommand(strSQL, objCn)


Try
objCmd.ExecuteNonQuery()
Catch
lblText.Visible = True
lblText.Text = "Bewerken mislukt!"
Finally
objCn.Close()
End Try

txtTitel.Text = ""
txtTekst.Text = ""
txtPoster.Text = ""
lblText.Visible = True
lblText.Text = "Document succesvol bijgewerkt!!"
o

orez

Legacy Member
Rutger zei:
Ook een optie ;-)

En Update Query macheert nu ook niet meer.. Ziet der volledig correct uit, maar wss zal der wel iets verkeerd aan zijn :)
Wel kut, ik moet een eindwerk maken in asp.net, maar krijgen daar bijna geen les over, veel draait bij ons om java en VB 6.0

Dit is code van Update query, mis dat jij het vindt ru'orez

Dim strTekst As String
Dim strTitel As String
Dim strPoster As String
Dim strGroepnaam As String

strGroepnaam = "Groep " & Session("intPrivilege")
strTitel = txtTitel.Text
strTekst = txtTekst.Text
strPoster = txtPoster.Text

Dim connectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source=" & Server.MapPath("Website.mdb")

Dim objCn As New OleDb.OleDbConnection(connectionString)
objCn.Open()

Dim strSQL As String = "UPDATE Documentengroep SET Groepnaam=strGroepnaam,DocLink=strTitel,DocTekst=strTekst,Poster=strPoster WHERE DocLink = '" & lstGroep1.SelectedValue & "';"
Dim objCmd As New OleDb.OleDbCommand(strSQL, objCn)


Try
objCmd.ExecuteNonQuery()
Catch
lblText.Visible = True
lblText.Text = "Bewerken mislukt!"
Finally
objCn.Close()
End Try

txtTitel.Text = ""
txtTekst.Text = ""
txtPoster.Text = ""
lblText.Visible = True
lblText.Text = "Document succesvol bijgewerkt!!"
Klik om te vergroten...


Check uwen pm :)
En voor Try Catch
Probeer

Catch ex As SqlClient.SqlException
Dan controleert em enkel op SQL fouten en krijg je eventuele andere nog te zien, zo zoekte u ook ni rot :p

*btw nog een snelheidstip open uwen connectie pas NA al uw declaraties, dus net voor wanneer ge executenonquery gebruikt. :)

Is overzichtelijker en parset sneller als ge meerdere query's gebruikt.
W

WoDkA

Legacy Member
Boddah zei:
parameters in een sql commando hebben een @ van voor.
Klik om te vergroten...

bij een Access DB gebruik ik "?" ( OleDbParameter ) , maar anders een @ ja ( SqlParameter )
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan