Avatar billede ponyboye Nybegynder
23. april 2004 - 11:14 Der er 33 kommentarer og
1 løsning

Skrive til databse og udtræk fra database hjælp.

Jeg har arbejde et stykke tid med en spskrift database og er nu gået i stå. Jeg har prøvet at finde noget hjælp fra forum og programmerings sider, men intet kunne hjælpe.

Jeg har 3 ting jeg kunne bruge noget hjælp til. Siden kan ses her: http://www.danskehojtider.dk/opskrifter/default.asp og indtil id 9 er der noget i databasen.

1. På forsiden vil jeg gerne have udskrevet link vandret. Kan bare ikke få den til det.

Koden:

strSQL = "Select * From kategorier Order By hojtidnavn"

Set rs = Conn.Execute(strSQL)

  Do
  strNavn = rs("hojtidnavn")

  strLink = "<a href='visopskrift.asp?id=" & rs("hojtid") & "'>" & strNavn & "</a>"

  Response.Write ("<li>" & strLink & "</li>&nbsp;&nbsp;&nbsp;&nbsp;")


rs.MoveNext
Loop While Not rs.EOF


2. I databasen har jeg opdelt ingredienserne hver for sig. Jeg kalder dem in1 / in2 / in3 / in4 o.s.v indtil in30
Nu vil jeg gerne have den til at ud skrive alle felterne i "in" som der er skrevet i.
Sådanne at alle ingredienserne bliver udskrevet indtil der ikke er flere og så den undlader tomme felter.

Grunden til at de er hver for sig er fordi man skal kunne søge i ingredienser og derefter kunne få vist opskrifter med den søgte ingrediens.


3. Jeg ønsker at lave en søgefunktion hvor der er mulighed for at søge på ingrediensernes navn ,opskriften navn eller alle ord der passer på søgningen.
Jeg kan bare ikke finde noget om dette, så jeg ved ikke hvor jeg skal starte eller slutte.

Jeg håber meget at der er en der vil hjælpe så jeg kunne komme vidre med dette. På forhånd tak
Avatar billede websam Nybegynder
23. april 2004 - 16:32 #1
Hvad mener du med vandret i forhold til det du har nu ?

/Websam
Avatar billede websam Nybegynder
23. april 2004 - 16:35 #2
Er det fordi du vi lhave dem inddelt under kategorier eller ?

/Websam
Avatar billede ponyboye Nybegynder
23. april 2004 - 16:35 #3
jeg mener at i steden for at gå fra top til bund, så skal den gå fra ventre til højer og når den har vist 4 skal den skrifte line
Avatar billede websam Nybegynder
23. april 2004 - 16:37 #4
Ok prøv at hænge på 2 min det har jeg et eksempel liggende på :o)

/Websam
Avatar billede ponyboye Nybegynder
23. april 2004 - 16:42 #5
dejligt
Avatar billede ponyboye Nybegynder
23. april 2004 - 16:50 #6
når ja det kan du heller ikke se, Men det hæger sådanne sammen at der skal være 4 link oversigter. Højtider, Mad fra andre lande, kategori oversigt og danmark kokke opskrifter.

Derfor er jeg nød til at have opdelt dem vandret så disse kategorier kommer til at lægger under hianden
Avatar billede websam Nybegynder
23. april 2004 - 16:57 #7
Denne stump kode burde ordne det vandrette :

<table border="0" cellPadding="4" cellSpacing="2" width="100%">
  <tr>
  <%
    i = 1
    while not rs.EOF
    strSQL = "Select * From kategorier Order By hojtidnavn"
    Set rs = Conn.Execute(strSQL)
   
    strNavn = rs("hojtidnavn")
    strLink = "<a href='visopskrift.asp?id=" & rs("hojtid") & "'>" & strNavn & "</a>"
   
    With Response
      .Write"<td>"
      .Write"<li>" & strLink & "</li>"
      .Write"</td>" & vbcrlf
    End With
    if (i mod 2) = 0 then
      strHTML = strHTML & "</tr><tr>" & vbcrlf
    end if
    i = i + 1   
    rs.MoveNext
    wend
  %>
  <tr>
</table>

Prøv lige dette så klare vi lige den andenbagefter

/Websam
Avatar billede websam Nybegynder
23. april 2004 - 16:58 #8
Ups sådan her :

<table border="0" cellPadding="4" cellSpacing="2" width="100%">
  <tr>
  <%
    strSQL = "Select * From kategorier Order By hojtidnavn"
    Set rs = Conn.Execute(strSQL)
   
    i = 1
    while not rs.EOF
   
    strNavn = rs("hojtidnavn")
    strLink = "<a href='visopskrift.asp?id=" & rs("hojtid") & "'>" & strNavn & "</a>"
   
    With Response
      .Write"<td>"
      .Write"<li>" & strLink & "</li>"
      .Write"</td>" & vbcrlf
    End With
    if (i mod 2) = 0 then
      strHTML = strHTML & "</tr><tr>" & vbcrlf
    end if
    i = i + 1   
    rs.MoveNext
    wend
  %>
  <tr>
</table>

/Websam
Avatar billede websam Nybegynder
23. april 2004 - 17:32 #9
I denne linie :

if (i mod 2) = 0 then

ændre du blot 2 tallet til de antal rækker du vil have vist vandret og i dit tilfælde til 4

if (i mod 4) = 0 then

/Websam
Avatar billede ponyboye Nybegynder
23. april 2004 - 18:35 #10
jeg prøver lige at kigge på det
Avatar billede ponyboye Nybegynder
23. april 2004 - 18:44 #11
den er kommede til at lægge vandret, men den mangler nu bare at skrifte line når den når 4 link, det vil den ikke
Avatar billede websam Nybegynder
23. april 2004 - 18:59 #12
Prøv lige at sende mig din db på martin@kites.dk så kigger jeg lige på det

/Websam
Avatar billede ponyboye Nybegynder
23. april 2004 - 19:07 #13
den er hermed af sendt
Avatar billede websam Nybegynder
23. april 2004 - 19:18 #14
Hvordan ser din connection string ud til databasen ?
Avatar billede ponyboye Nybegynder
23. april 2004 - 19:22 #15
du får lige det hele:

<%
    Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("opskriftdata.mdb")
Conn.Open DSN

    strSQL = "Select * From kategorier Order By hojtidnavn"
    Set rs = Conn.Execute(strSQL)
   
    i = 1
    while not rs.EOF
   
    strNavn = rs("hojtidnavn")
    strLink = "<a href='visopskrift.asp?id=" & rs("hojtid") & "'>" & strNavn & "</a>"
   
    With Response
      .Write"<td>"
      .Write"<li>" & strLink & "</li>"
      .Write"</td>" & vbcrlf
    End With
    if (i mod 2) = 0 then
      strHTML = strHTML & "</tr><tr>" & vbcrlf
    end if
    i = i + 1   
    rs.MoveNext
    wend
  Conn.Close
Set Conn = Nothing
%>
Avatar billede websam Nybegynder
23. april 2004 - 19:44 #16
Det var underligt jeg har det kørende på en anden side og der virker det fint jeg kigger lige lidt mere på det hæng på :o)
Avatar billede ponyboye Nybegynder
23. april 2004 - 19:44 #17
ok jeg hænger i
Avatar billede websam Nybegynder
23. april 2004 - 19:53 #18
Det er øjnene man først bliver blind på her kommer den :

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("opskriftdata.mdb")
Conn.Open DSN

    strSQL = "Select * From kategorier Order By hojtidnavn"
    Set rs = Conn.Execute(strSQL)
   
    i = 1
    while not rs.EOF
   
    strNavn = rs("hojtidnavn")
    strLink = "<a href='visopskrift.asp?id=" & rs("hojtid") & "'>" & strNavn & "</a>"
   
    With Response
      .Write"<td>"
      .Write"<li>" & strLink & "</li>"
      .Write"</td>" & vbcrlf
    End With
    if (i mod 4) = 0 then
      Response.Write "</tr><tr>" & vbcrlf
    end if
    i = i + 1   
    rs.MoveNext
    wend
  Conn.Close
Set Conn = Nothing
%>
Avatar billede websam Nybegynder
23. april 2004 - 20:26 #19
Hva så for du det til at virke ?
Avatar billede ponyboye Nybegynder
23. april 2004 - 20:38 #20
Jo den del en hjemme og virker meget fint
Avatar billede websam Nybegynder
23. april 2004 - 20:43 #21
Hvad angår punkt 2 er det så alle og en hver der skal kunne indsætte opskrifter eller er det kun folk med tilknytning til siden ?
Avatar billede websam Nybegynder
23. april 2004 - 20:48 #22
Uanset hvad så ville jeg da lave et notat felt til ingredienser og så bare et text area hvor disse bliver skrevet i til lagring i databasen når du så skal lave din søgning søger du blot hele notat feltet igennem efter de søgte ord og på den måde mindsker du din database med felter og belastning på database og maskine når der søges :o)

/Websam
Avatar billede ponyboye Nybegynder
23. april 2004 - 21:01 #23
ja der skal alle kunne lægge opskrifter op i databsen, men de skal fri gives af admin.

Det du skriver om søgning, med felter og text area skal det lige sige at det med søgning har jeg aldrig prøvet før og ved ikke hvordan det skal gribes an.
Det du skriver lyder som logik, men derfra og så udføre det er ikke så godt.

Der er ikke en side hvor der står noget om dette?
Jeg syntes ikke at kunne finde noget.
Avatar billede websam Nybegynder
23. april 2004 - 21:21 #24
Denne artikel beskriver det ganske godt :

http://activedeveloper.dk/artikler/default.asp?articleid=60
Avatar billede websam Nybegynder
23. april 2004 - 21:26 #25
Avatar billede ponyboye Nybegynder
23. april 2004 - 23:33 #26
Det første link tror jeg at jeg kan finde ud af. Mne det andet...uha der giver jeg op
Avatar billede websam Nybegynder
24. april 2004 - 11:40 #27
Ja ok men den første kan oxo sagtens bruges :o)

/Websam
Avatar billede ponyboye Nybegynder
24. april 2004 - 11:52 #28
vil du ikke være sød at kigge om det er lavet rigtigt. Bare klik ind på side og se om det hele virker.
Avatar billede websam Nybegynder
24. april 2004 - 11:57 #29
Du får fint listet dine menuer det ser godt ud :o) Kan du ikke lige give mig et ord som du ved ligger i databasen så vi er sikre på at søgningen virker men der kommer ingen fejl :o)

/Websam
Avatar billede websam Nybegynder
24. april 2004 - 12:08 #30
Ok jeg var heldig og ramme noget ved søgning på vand så det ser fint ud det hele :o)

/websam
Avatar billede ponyboye Nybegynder
24. april 2004 - 12:25 #31
dejligt. syntes bare der er et eller andet galt med udskrivning af søge resultet. prøv at søge på ba og se i bunden
Avatar billede ponyboye Nybegynder
24. april 2004 - 12:28 #32
bagte boller lægger i databasen
Avatar billede websam Nybegynder
24. april 2004 - 14:13 #33
der skal du lige have styr på dine tabeller i layoutet
Avatar billede ponyboye Nybegynder
24. april 2004 - 15:20 #34
ja det må jeg lige kigge på. Jeg takker for den hjælp du har givet. Lige det sidste, har du en kode der fremhæver det søge ord i søgefunktionen og hvordan får jeg den til at lave et line skrift i det den udskriver, da det ellers ikke vil kunne være der?
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