Meddelande

Minska
No announcement yet.

Lista/meny som uppdaterar

Minska
X
 
  • Filter
  • Klockan
  • Show
Clear All
new posts

  • Lista/meny som uppdaterar

    Hejsan



    Jag håller på och gör en hemsida, och där vill jag att en blädderlista ska uppdatera informationen som ska stå på hemsidan.

    Använder DW och access 07.


    Nån som kan hjälpa till?

  • #2
    Välkommen till webforum!

    Jag har två frågor!
    Vad menar du med blädderlista?
    Vad är DW?

    Kommentera


    • #3
      Ahh, du menar såklart Dreamweaver!

      Men jag undrar fortfarande vad du menar med blädderlista? Vill du kunna administrera sidan och ändra innehållet?
      Last edited by noshornin; 2010-03-01, 12:05. Anledning: stavfel

      Kommentera


      • #4
        Vi säger att jag har 10 st personer. Då vill jag kunna få fram information om en enskild person genom att använda blädderlistan och kunna ändra det.

        Kommentera


        • #5
          Okey!

          Du har alltså en databas med olika kolumner med information om vissa personer. och du har 10 stycken rader i databasen. Du vill kunna välja vilken person som du vill ändra informationen om i en select list!

          Det skulle underlätta något om du postar din nuvarande kod. Jag har ingen lust och skriva hela koden åt dig!

          Kommentera


          • #6
            Precis så är det.

            Det är ju det, har ingen kod. Det är inte det jag behöver utan bara hur man ska börja o lite sånt, så jag kommer igång.

            Kommentera


            • #7
              Okey!

              Du börjar med att connecta till databasen. det gör du genom att skriva:
              Kod:
              <%
              Set conn = Server.CreateObject("ADODB.Connection")
              conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("dindatabas.mdb")
              %>
              Ändra dindatabas.mdb till namnet på din databas.

              Sen så hämtar du ut alla poster och lägger in dom i listan genom att skriva:
              Kod:
              <form method="POST" action="change.asp">
              <select>
              <%
              sql = "SELECT * from tabell"
              Set rs = conn.Execute(sql)
              
              Do Until rs.EOF
              %>
              <option value='<%=rs("ID") %>'><%=rs("namn") %></option>
              <%
                  rs.MoveNext
                Loop
              %>
              </select>
              
              <input type="submit" value="ändra">
              </form>
              Ändra namn till namnet på kolumnen som du vill skriva ut.

              Sen så i filen change.asp
              så skriver du typ ut all information som finns i databasen i textfields eller liknande:

              Kod:
              <%
              strID=request.form("ID")
              %>
              
              <form method='POST' action='<%=publicera.asp?ID="&strID&"%>'>
              
              sql = "SELECT * FROM tabell WHERE ID="&strID&""
              Set rs= conn.Execute(sql)
              
              <input name='age' type='text' value='<%=rs("age")%>'>
              <input name='namn' type='text' value='<%=rs("name")%>'>
              <input type='submit' value='publicera'>
              <form>
              Sen filen publicera.asp:
              Kod:
              strID=Request.QueryString("bilder")
              strNamn=request.form("namn")
              strAge=request.form("age")
              sql = "UPDATE tabell SET namn='"& strNamn'&" , age='"&strAge&"' WHERE id ="& ID &""
               conn.Execute(sql)
              Hoppas det där hjälpte lite!
              Last edited by noshornin; 2010-03-01, 14:17. Anledning: inga ' runt ID.

              Kommentera


              • #8
                Tack så mycket! Det gör det säkert..

                Kommentera


                • #9
                  Hur gick det lyckades du få det att fungera så som du ville ha det?

                  Kommentera


                  • #10
                    Nej, tyvärr så funkade det inte riktigt som jag ville. Connecta till databasen går väl att köra genom programmet, för på ditt sätt så ville den inte alls hitta filen, fast jag redirektade den till den mappen där den ligger.

                    Kommentera


                    • #11
                      En dum fråga kanske, har du installerat någon webbserver? Typ IIS?

                      Kommentera


                      • #12
                        Japp, har iis.

                        Kommentera


                        • #13
                          Okey, bra. Men publicera din nuvarande kod så kanske jag kan se vart det blir fel.

                          Kommentera


                          • #14
                            Sen bör man skriva ut ASP koden själv. DW är väll mera gjord för att fixa design och sånt.

                            Kommentera


                            • #15
                              <form name="form1" class="stil4" id="form1">
                              <label> <span class="stil4"><br />
                              Hyresgäst:<br />
                              <select name="hyresgäst" class="stil1" id="hyresgäst">
                              <%
                              While (NOT listmeny.EOF)
                              %>
                              <option value="<%=(listmeny.Fields.Item("debiteringar_kundnr").Value )%>"><%=(listmeny.Fields.Item("debiteringar_hyresgäst").Valu e)%></option>
                              <%
                              listmeny.MoveNext()
                              Wend
                              If (listmeny.CursorType > 0) Then
                              listmeny.MoveFirst
                              Else
                              listmeny.Requery
                              End If
                              %>
                              </select>
                              </span>

                              <p onmouseover="MM_validateForm('textfield2','','R');return document.MM_returnValue">
                              <input name="kundnr" type="text" class="stil1" id="kundnr" value="<%=(debuppdatera.Fields.Item("debiteringar_kundnr").V alue)%>" />





                              </form>
                              Last edited by nexr; 2010-03-02, 10:55.

                              Kommentera

                              Working...
                              X