Avatar billede bobbedude Nybegynder
31. oktober 2002 - 09:16 Der er 4 kommentarer og
2 løsninger

Hvordan går jeg det ?

Jeg har en email adresse som kommer fra en form.
Request.Form("email")

Jeg har en Tabel der hedder Opskrifter som har et felt Oprindelse hvor email bliver sat ind jeg har også et felt i samme Tabel som hedder OpskriftsID hvor typen er tal.

Den anden Tabel hedder VinderOpskrifter i den er der et felt OpskriftsID

Hvordan kan jeg loope gennem Tabellen Opskrifter og se om emailen eksister og hvis den gør se om OpskriftsID fra samme tabel også eksister i Tabellen VinderOpskrifter og hvis den gør skrive
"Du har været nomineret en gang"

håber der er en der fårstår hvad jeg mener.
Avatar billede zeptic Nybegynder
31. oktober 2002 - 09:20 #1
Din SQL sætning kommer itl at se således ud:
SELECT *
FROM Opskrifter O, VinderOpskrifter VO
WHERE O.Oprindelse= Request("email")
AND O.OpskriftsID=VO.OpskriftsID

Så skal du bare pakke den rigtigt ind
Avatar billede bobbedude Nybegynder
31. oktober 2002 - 09:27 #2
hmm ja men hvordan får jeg det pakket indd ??
Avatar billede bobbedude Nybegynder
31. oktober 2002 - 09:48 #3
Jeg har lavet det her

CheckMail = Request.Form("email")
   
    set connect = server.createobject("ADODB.Connection")
    Connect.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("../../_private/hatting.mdb")
    SQL = "Select * From Opskrifter"
    Set Srs = Connect.Execute(SQL)
   
    if not Srs.EOF Then
    Do Until Srs.EOF
   
        If CheckMail = Srs("Oprindelse") Then
       
            SQL2 = "Select * From VinderOpskrifter Where OpskriftsID = "& Srs("OpskriftsID") &" "
            Set Srs2 = Connect.Execute(SQL2)
           
            if not Srs2.EOF Then
                    Do Until Srs2.EOF
                   
                    Response.write "Fanget"
                   
                    Srs2.MoveNext
                Loop
            Else
                Response.write "Den var her ik"
            End If
               
           
       
        Else
        End If
   
    Srs.MoveNext
    Loop
    Else
    '=====Fang Fejl
    End If

men der siger både der er her og den er her ikke
Avatar billede bobbedude Nybegynder
31. oktober 2002 - 10:45 #4
nææ det virker
Avatar billede bobbedude Nybegynder
31. oktober 2002 - 10:47 #5
zeptic håber det er ok at vi deler point, da jeg ikke brugte din løsning.
men du fik point fordi du prøvede.
Avatar billede eagleeye Praktikant
31. oktober 2002 - 10:59 #6
Du kan gøre sådan her:


SQL = "SELECT Opskrifter.id, Opskrifter.email FROM Opskrifter INNER JOIN VinderOpskrifter ON Opskrifter.id = VinderOpskrifter.OpskriftsID WHERE Opskrifter.email = '" & Request.Form("email") & "'"

Set Srs = Connect.Execute(SQL)

if Srs.EOF then
  Response.write "Den var her ikke"
else
  Response.write "Du har været nomineret en gang"
end if
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