Notifikationer

Markér alle som læst Log ud

movex Nybegynder

18. marts 2001 - 18:59 Der er 28 kommentarer

Hvordan sletter jeg noget i en Database ?

Jeg har lavet et script så man kan oprette nyheder på min hjemmeside.... Og så har jeg lavet en admin side.. Hvordan laver jeg sådan at man kan markere nyheder som man vil have slettet når jeg er logget ind som Admin på min side ??

Synes godt om

netsrac Praktikant

18. marts 2001 - 19:01 #1

conn.execute(\"delete from nyheder where id = \" & request.querystring(\"id\"))

f.eks.

Synes godt om

movex Nybegynder

18. marts 2001 - 19:03 #2

Ja tak.. Men det har jeg prøvet.. Du er nødt til at fortælle mig hvordan jeg connecter til min DB... Og hvordan jeg får det til at se nogenlunde godt ud.... Jeg vil jo have sådan at der bare står slet ud foran dem (Altså kun når jeg er logget ind som Admin...... Og når jeg så trykker på slet.. Så skal den slette dem..

Synes godt om

mouzey Nybegynder

18. marts 2001 - 19:04 #3

Må vi se den admin? ;o)

Synes godt om

netsrac Praktikant

18. marts 2001 - 19:06 #4

Så bliver vi nok nød til at se lidt kode..

Synes godt om

movex Nybegynder

18. marts 2001 - 19:09 #5

<html>
<head>
<title>Nyhedsting</title>
<link rel=stylesheet type=\"text/css\" href=\"css-script/styles.css\">
<link rel=stylesheet type=\"text/css\" href=\"../style/stylenormal.css\">
</head>

<body bgcolor=\"#000000\" leftmargin=\"0\" topmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">

<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>

<td width=\"100%\" height=\"70\" align=\"left\" valign=\"middle\"><img border=\"0\" src=\"gfx/adgangskontrol.gif\"></td>

</tr>
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\">
<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\" bgcolor=\"#17354A\"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\">
<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\" bgcolor=\"#96B3C8\"></td>
</tr>
</table>
</td>
</tr>
<tr>

<td width=\"100%\" height=\"22\" align=\"center\" valign=\"middle\">

<div><a href=\"tilfojnyhed.asp\" target=\"_top\">Tilføj Nyhed</a>      
<a href=\"sletnyhed.asp\" target=\"_top\">Slet Nyhed</a>      
<a href=\"tilfojseniorspiller.asp\" target=\"_top\">Tilføj Senior Spiller</a>
     <a href=\"sletseniorspiller.asp\" target=\"_top\">Slet
Senior Spiller</a>       <a href=\"tilfojjuniorspiller.asp\" target=\"_top\">Tilføj
Junior Spiller</a>       <a href=\"sletjuniorspiller.asp\" target=\"_top\">Slet
Junior Spiller</a>       <a href=\"logout.asp\" target=\"_top\">Log
Ud<b> </b></a></div>
</td>

</tr>
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\">
<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\" bgcolor=\"#17354A\"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\">
<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\" bgcolor=\"#96B3C8\"></td>
</tr>
</table>
</td>
</tr>
<tr>

<td width=\"100%\" height=\"100%\" align=\"left\" valign=\"top\">

<div class=\"indhold\"><%

Response.Buffer = True

\' Funktion der fikser quotes...
FUNCTION fixQuotes( theString )
fixQuotes = Replace( theString, \"\'\", \"\'\'\" )
END FUNCTION

\' Hent data fra formular
Nyhed = Request( \"Nyhed\" )
Forfatter = Request( \"Forfatter\" )

\' Connection til database.
Set Con = Server.CreateObject( \"ADODB.Connection\" )
DBPath = \"DBQ=\" & server.mappath(\"../database.mdb\")
Con.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath

\' ... Ogsaa saetter vi vores data fra formularen ind i databasen
IF Request.Servervariables(\"Content_Length\") > 0 THEN
Sql = \"INSERT INTO nyheder (Dato, Nyhed, Forfatter) VALUES(\'\" & Date() & \"\',\'\" & fixQuotes( Nyhed ) & \"\',\'\" & fixQuotes( Forfatter ) & \"\')\"
Con.Execute Sql

\' Og her skriver vi lige en lille besked om at nu er nyheden tilfoejet
Response.Write \"<strong>Tak for din nyhed. Den er blevet tilføjet til databasen. </strong>\"

END IF

%> <!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">
<div align=\"center\">
<p> </p>
<p><font color=\"#FFFFFF\" size=\"3\" face=\"Courier New, Courier, mono\">NYHEDER</font><br>
<br>
<br>
</p>
</div>
<form action=\"tilfojnyhed.asp\" method=\"POST\" target=\"_self\">
<div align=\"center\">
<table border=\"0\" width=\"600\">
<tr>
<td valign=\"top\" width=\"104\">
<div align=\"left\"><font color=\"#FFFFFF\" size=\"3\" face=\"Courier New, Courier, mono\">Nyhed</font></div>
</td>
<td width=\"486\">
<div align=\"left\">
<textarea cols=\"90\" rows=\"15\" name=\"Nyhed\"></textarea>
</div>
</td>
</tr>
<tr>
<td width=\"104\">
<div align=\"left\"><font color=\"#FFFFFF\" size=\"3\" face=\"Courier New, Courier, mono\">Forfatter</font></div>
</td>
<td width=\"486\">
<input type=\"text\" name=\"Forfatter\">
</td>
</tr>
<tr>
<td colspan=\"2\" align=\"center\">
<div align=\"left\">
<p> </p>
<p align=\"center\">
<input type=\"submit\" value=\"Tilføj Nyhed\" name=\"submit\">
</p>
</div>
</td>
</tr>
</table>
</div>
</form>

</div>
</td>

</tr>
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\">
<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\" bgcolor=\"#17354A\"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\">
<table width=\"100%\" height=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td width=\"100%\" height=\"1\" align=\"left\" valign=\"top\" bgcolor=\"#96B3C8\"></td>
</tr>
</table>
</td>
</tr>
<tr>

<td width=\"100%\" height=\"20\" align=\"center\" valign=\"middle\">
<div><b>Lavet af <a href=\"http://www.athena.as\" target=\"_blank\">AthenA Communications</a>
    -     Copyright 2000 © <a href=\"http://www.athena.as\" target=\"_blank\">AthenA
Communications</a>     -     All rights
reserved</b></div>
</td>

</tr>
</table>

</body>
</html>

Synes godt om

kornfreak Nybegynder

18. marts 2001 - 20:55 #6

AthenA Communications ?..så vidt jeg ved kan de da sin asp? :)

Synes godt om

movex Nybegynder

18. marts 2001 - 20:57 #7

Ja.. Men vi er en under afd. af AthenA Communications.....

Synes godt om

kornfreak Nybegynder

18. marts 2001 - 21:02 #8

Okay :)

Synes godt om

movex Nybegynder

18. marts 2001 - 21:22 #9

Ohh... Er der ingen som kan svare ??

Synes godt om

netsrac Praktikant

18. marts 2001 - 21:24 #10

movex >> send filerne til eksperten@cnh.dk så skal jeg lave det for dig, husk at sende db´en også.

Synes godt om

movex1 Nybegynder

18. marts 2001 - 21:29 #11

Sådanner..

Synes godt om

netsrac Praktikant

18. marts 2001 - 21:31 #12

Hm...hvorfor kommenterer movex1 pludselig dette spørgsmål ? Du er godt klar over at man kun må have en bruger på eksperten ikke ?

Synes godt om

hotpop Novice

18. marts 2001 - 21:40 #13

movex> kig lige her så får du en overraskelse!
http://www.eksperten.dk/spm/57706

Synes godt om

darkboy Nybegynder

18. marts 2001 - 21:46 #14

FUsker......

http://www.eksperten.dk/spm/57706

Synes godt om

mkilic Nybegynder

18. marts 2001 - 22:40 #15

Til Movex. Hvordan har du lavet det med at, når man klikker på en nyhed i din nyhedsoversigten på din hjemmeside (http://www.athena.as), at man så kommer over til vindue med oplysninger omkring netop den nyhed man har klikket på. Jeg skal bruge noget ligende i et skoleprojekt.

Synes godt om

kornfreak Nybegynder

18. marts 2001 - 22:43 #16

Simpelt...det er med en database ?

Iøvrigt er Athena Communications et firma, har selv været i praktik der, og at en medarbejder går ind for snyd, er vel ikke den bedste omtale de kan få ;)

Synes godt om

netsrac Praktikant

18. marts 2001 - 22:44 #17

mkilic >> *lol* det er næppe movex der har lavet athena.as

Synes godt om

jens_k Nybegynder

20. marts 2001 - 08:57 #18

Movex er en af mine kammerater.. Og han er grafikere... Det er ham som har lavet alt grafiken på www.athena.as... Og det er jo ikke ligefrem en grim hjemmeside vel ?....Så NETSRAC.... WRONG ANSWER.... Det er nemlig Movex der har lavet www.athena.as

Synes godt om

netsrac Praktikant

20. marts 2001 - 11:00 #19

jens_k >> Godt det ikke er mig der har en kammarat der snyder.

Synes godt om

hotpop Novice

20. marts 2001 - 11:12 #20

mee too!
p.s. Movex og Movex1 er slettet!

Synes godt om

hotpop Novice

20. marts 2001 - 11:13 #21

Ingen links men OK, jeg sletter dem. Det er åbentlyst med de navne !!

Mvh.
Andreas, Eksperten.dk

> -----Original Message-----
> From: x
> Sent: 18. marts 2001 21:45
> To: info@eksperten.dk
> Subject: snyd
>
>
> Kig lige på dette spørgsmål plus link da jeg er overbevist om at movex og
> movex1 er den samme person!
>
> Hotpop
>
>

Synes godt om

kornfreak Nybegynder

20. marts 2001 - 13:47 #22

Vil tro Movex arbejder på Athena Visions ..men hvis han skulle ha hjælp til asp, kunne han vel sætte en af deres egne medarbejdere i gang med det!

Synes godt om

moviez Nybegynder

23. juli 2001 - 01:28 #23

hvad med at lukke ??

Synes godt om

jens_k Nybegynder

23. juli 2001 - 08:26 #24

Hey MoveX...

Du skriver at du arbejder ved Athena. Det gør jeg tilfældigvis også, du kunne vel ikke fortælle mig hvad du hedder fornavn, for vi må jo være kollega´er.

Og Kornfreak, jeg giver dig fuldstændig ret, hvis han arbejdede her, så ville han nok få en anden til at lave det.

/JK

Synes godt om

moviez Nybegynder

23. juli 2001 - 10:34 #25

jen-j > har du ik løset dit problem ??

hvis ik, så skal jeg nok give dig et eks.

Synes godt om

jens_k Nybegynder

23. juli 2001 - 10:39 #26

Øhh du mener vel Movex ?

Synes godt om

moviez Nybegynder

23. juli 2001 - 10:41 #27

nå jo ;o) movex !

Synes godt om

c Nybegynder

02. juli 2003 - 21:59 #28

Set Con = Server.CreateObject( \"ADODB.Connection\" )
DBPath = \"DBQ=\" & server.mappath(\"../database.mdb\")
Con.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; \" & DBPath

if (request("mode") = "del") then
con.execute("DELETE * FROM nyheder WHERE id="& request("id"))
end if

SQL = "SELECT * FROM nyheder"
set rs = con.execute(SQL)

do while not (rs.BOR or rs)
response.write("<a href=""admin.asp?mode=del&id="& rs("id") &""">Slet</a> "& rs("Dato") &" - "&rs("forfatter"))
Loop

Dette bør virke...

jeg kan forresten ikke forstå at du ikke har nogen form for tjek på om man er logget ind, og ikkehar en overskrift på nyheden...

mvh
Christian

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
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
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

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