Avatar billede doomstone Nybegynder
27. oktober 2001 - 19:47 Der er 4 kommentarer og
1 løsning

plz help!

Er der en der kan lave et script der updatere ifno som bliver sendt her fra til databesn 98 og tabellen hedder medlemmer. databasen ligger i samme mappe som filen!

Her er side som Bruger indtaster sin nye info i!!!!


<center>

<%
SQL = \"SELECT * FROM medlemmer WHERE ID = \"& Session(\"login\")
Set RS = conn.Execute(SQL)
%>
<FORM ACTION=\"saveinfo.asp\" METHOD=\"POST\" NAME=\"profil\" onsubmit=\"return validate(this)\">

<table border=\"0\" width=\"600\" bgcolor=\"#003399\">
  <tr>
    <td width=\"100%\">
      <table border=\"0\" width=\"100%\">
        <tr>
          <td width=\"50%\">
            <table border=\"0\" width=\"100%\">
              <tr>
                <td width=\"50%\">Alias:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\">
                      <%
                      alias=RS.Fields(\"alias\")
                      %><font color=\"#000000\">
                      <input name=alias type=text value=<%=alias%>>
                      </td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Navn:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><font color=\"#000000\"><input name=navn type=text value=<%=RS.Fields(\"navn\")%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Mail:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\">
                      <%
                      email=RS.Fields(\"mail\")
                      %>
                      <font color=\"#000000\"><input name=mail type=text value=<%=mail%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">ICQ:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><%
icq = RS.Fields(\"icq\")
%>
<input name=icq type=text value=<%=icq%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Password:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><font color=\"#000000\"><input name=password type=text value=<%=RS.Fields(\"password\")%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Våben:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><font color=\"#000000\"><input name=vaben type=text value=<%=RS.Fields(\"vaben\")%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Item:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><font color=\"#000000\"><input name=item type=text value=<%=RS.Fields(\"item\")%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Map:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><font color=\"#000000\"><input name=map type=text value=<%=RS.Fields(\"map\")%>></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Score:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><font color=\"#000000\"><%=RS.Fields(\"Score\")%></td>
                    </tr>
                  </table>
                </td>
              </tr>
              <tr>
                <td width=\"50%\">Hjemmeside:</td>
                <td width=\"50%\">
                  <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\"><%=alias%>\'s HP</td>
                    </tr>
                  </table>
                </td>
              </tr>
            </table>
          </td>
          <td height=\"100%\" width=\"50%\">
          <table bgcolor=\"#FFFFFF\" cellpadding=\"1\" height=\"100%\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
                    <tr>
                      <td width=\"100%\">
<input name=pic align=center type=text value=<%=RS.Fields(\"pic\")%>></td>
                    </tr>
            </table>
          </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr>
    <td width=\"100%\">
      <table border=\"0\" width=\"100%\">
        <tr>
          <td width=\"100%\">Kommentar:
            <table  bgcolor=\"#FFFFFF\" cellpadding=\"1\" width=100% cellspacing=\"0\" border=1 bordercolor=\"#000000\">
              <tr>
                <td width=\"100%\"><font color=\"#000000\"><TEXTAREA ROWS=\"4\" COLS=\"20\" NAME=\"om\"><%=RS.Fields(\"om\")%></textarea></td>
              </tr>
            </table>
          </td>
        </tr>
        <tr>
          <td width=\"100%\">
            <p align=\"right\">Sidst opdateret den. Opdateres selv</td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<input type=submit Value=gem>

</form>







</center>

Avatar billede beatone Nybegynder
27. oktober 2001 - 19:59 #1
prøv det her:

-------------------------------------

<%
response.buffer=\"true\"
%>
<%

alias = request.form(\"alias\")
navn = request.form(\"navn\")
mail = request.form(\"mail\")
icq = request.Form(\"icq\")
password = request.Form(\"password\")
vaben = request.Form(\"vaben\")
item = request.Form(\"item\")
map = request.Form(\"map\")
pic = request.Form(\"pic\")
om = request.Form(\"om\")

\' husk at ændre DIN_DATABASE.mdb til din databases rigtige navn ;)
connn = \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.mappath(\"DIN_DATABASE.mdb\")
Set conn = Server.CreateObject(\"ADODB.Connection\")
    conn.Open connn

Set RS = conn.Execute(\"UPDATE medlemmer SET alias = \'\" & alias & \"\', navn = \'\" & navn & \"\', mail = \'\" & mail & \"\', icq = \'\" & icq & \"\', password = \'\" & password & \"\', vaben = \'\" & vaben & \"\', item = \'\" & item & \"\', map = \'\" & map & \"\', pic = \'\" & pic & \"\', om = \'\" & om & \"\' where id = \" & id)

set RS=nothing
conn.close
set conn=nothing

%>
Avatar billede doomstone Nybegynder
27. oktober 2001 - 20:10 #2
hmm det skal være hvor ID = Session(\"login\")
Avatar billede doomstone Nybegynder
27. oktober 2001 - 20:12 #3
jeg fandte ud af hvordan :0)
Avatar billede coldrayie Nybegynder
27. oktober 2001 - 21:32 #4
Avatar billede beatone Nybegynder
28. oktober 2001 - 01:06 #5
Lidt dobbelt moralsk der coldrayie.... http://www.eksperten.dk/spm/103531 !!
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