CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

windswept Nybegynder

13. maj 2001 - 21:27 Der er 3 kommentarer

Slet post fra DB

Jeg skal have lavet det sådan at jeg kan slette en post ved at klikke på den.
Adressen på siden det skal virke på er:
Bemærk: Der skal IKKE komme en ny side frem!

http://home.domaindlx.com/biograf/database/xxx.asp

Koden til siden er på adr:
http://home.domaindlx.com/biograf/database/xxx.txt

Synes godt om

okay Nybegynder

13. maj 2001 - 21:38 #1

lytter med :o)

Synes godt om

madd Nybegynder

13. maj 2001 - 21:42 #2

<% @LANGUAGE = VBScript %>
<%
Option Explicit
Response.Expires = 0

Dim objConn, objRS, strQ, DSNName, strID
Dim strConnection

Set objConn = Server.CreateObject(\"ADODB.Connection\")
Set objRS = Server.CreateObject(\"ADODB.Recordset\")

DSNName = \"DRIVER=Microsoft Access Driver (*.mdb);DBQ=\"
DSNName = DSNName & Server.MapPath(\"xxx.mdb\")
ObjConn.Open DSNName

Set objRS.ActiveConnection = objConn

If Request(\"slet\") = \"yes\" Then
strQ = \"DELETE * FROM TblPerOpl WHERE id = \" & Request(\"id\")
objRS.Open strQ
Response.Redirect(\"xxx.asp\")
End If

strQ = \"SELECT TblPerOpl.Id, TblPerOpl.Navn,\"
StrQ = strQ & \"TblPerOpl.Adresse, TblPerOpl.PostnrBy, \"
StrQ = strQ & \"TblPerOpl.Telefonnummer, \"
StrQ = strQ & \"TblPerOpl.Fodselsdag, TblPerOpl.Interesser, \"
StrQ = strQ & \"TblPerOpl.Onske, TblPerOpl.Personbeskrivelse, \"
StrQ = strQ & \"TblPerOpl.Emailadresse \"
StrQ = strQ & \"FROM TblPerOpl \"
objRS.Open strQ

%>
<HTML>
<META NAME=\"ROBOTS\" CONTENT=\"NOARCHIVE\">
<head><title>xxx</title></head>
<BODY>

<hr>
<a href=\"xxxx.asp\" target=\"hovedramme\">Tilmelding</a>
<hr>

 xxx:


<center>
<table border=\"1\" width=\"50%\">
</center>

<%

While Not objRS.EOF
Response.Write \"<tr><td>Navn</tr></td>\" & \"<td>\" & objRS(\"Navn\") & \"</td>\"
Response.Write \"<tr><td>Adresse</tr></td>\" & \"<td>\" & objRS(\"Adresse\") & \"</td>\"
Response.Write \"<tr><td>Postnr og by</tr></td>\" & \"<td>\" & objRS(\"PostnrBy\") & \"</td>\"
Response.Write \"<tr><td>Telefonnummer</tr></td>\" & \"<td>\" & objRS(\"Telefonnummer\") & \"</td>\"
Response.Write \"<tr><td>Fødselsdag</tr></td>\" & \"<td>\" & objRS(\"Fodselsdag\") & \"</td>\"
Response.Write \"<tr><td>Interesser</tr></td>\" & \"<td>\" & objRS(\"Interesser\") & \"</td>\"
Response.Write \"<tr><td>Ønske</tr></td>\" & \"<td>\" & objRS(\"Onske\") & \"</td>\"
Response.Write \"<tr><td>Personbeskrivelse</tr></td>\" & \"<td>\" & objRS(\"Personbeskrivelse\") & \"</td>\"
Response.Write \"<tr><td>Emailadresse</tr></td>\" & \"<td>\" & objRS(\"Emailadresse\") & \"</td>\"
Response.Write \"<tr><td>Muligheder</tr></td>\" & \"<td><a href=\'xxx.asp?slet=yes?id=\" & rs(\"id\") & \"\'>Slet denne record</a></td>\"
Response.Write \"<tr><td colspan=2 bgcolor=#C0C0C0> </td>\"

objRS.MoveNext
Wend

objRS.close
objConn.close
Set objRS = Nothing
Set objConn = Nothing
%>
</BODY>
</HTML>

Synes godt om

windswept Nybegynder

14. maj 2001 - 18:09 #3

Det fungerer ikke. Der kommer godt nok ingen fejlmeddelse frem, og siden opdatere også, men der slettes bare ikke noget i db.

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP	6	09/03/202418:16	10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP	10	15/10/202313:12	18/10/202308:48

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS