Avatar billede team_matrix Nybegynder
23. april 2001 - 16:10 Der er 31 kommentarer og
1 løsning

Hjælp igen :o)

Hejsa... ja nu skriver jeg her igen.... nu er jeg endelig blevet færdig med at teste og finpudse mit admin-modul til min gæstebog, og det virker hvis jeg tester det i win2k. MEN når jeg uploader og så prøver på at slette elle opdatere nogle posts, så kommer der bare en hvis side med en fejlfarvet tabel hvor der står mærkelige ting i tekstfelterne... nogen der har en ide?
Avatar billede nute Nybegynder
23. april 2001 - 16:11 #1
har du en link ?
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:12 #2
tja men det er min personlige adminside så jeg er ikke så glad for at give den ud... men du kan få koden?
Avatar billede kong7 Nybegynder
23. april 2001 - 16:13 #3
Nope... men prøv igen..
Avatar billede keysersoze Guru
23. april 2001 - 16:13 #4
det lyder som om at dit webhotel ikke understøtter asp...

men har du en kode til hvor vi kan se fejlen?
Avatar billede kong7 Nybegynder
23. april 2001 - 16:14 #5
lav et nyt modul
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:15 #6
jeg har prøvet flere gange, og eftersom min side er lavet i asp og fungerer.... så tror jeg nok de understøtter asp :o)
Avatar billede kong7 Nybegynder
23. april 2001 - 16:15 #7
.
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:15 #8
jeg har prøvet flere gange, og eftersom min side er lavet i asp og fungerer.... så tror jeg nok de understøtter asp :o)
Avatar billede nute Nybegynder
23. april 2001 - 16:16 #9
kong_7 >> hva er det for et svar ???
Avatar billede kong7 Nybegynder
23. april 2001 - 16:17 #10
Hmm..
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:17 #11
her er koden i hvert fald:

<% mode = request(\"mode\") %>
<% Response.buffer = true %>
<% if mode = \"\" then %>
<body bgcolor=\"756F6F\">
<font face=\"Arial, Helvetica, sans-serif\" size=\"4\"><b>Administration af nyheder</b></font><br>
<br>
<%
\'Connection til databasen
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"nyheder.mdb\")
strSQL = \"select* from nyheder ORDER BY ID DESC\"
set rs = Conn.execute(strSQL)

if rs.EOF then
Response.write \"<font face=\"\"Verdana\"\" size=\"\"2\"\">Der er ingen indlæg i databasen!</font>\"
else
Do Until rs.EOF

%>
<%
\' Chekker om brugeren har en session.
\' Hvis ikke så smides han af
IF Session(\"password-session\") = \"\" Then
Response.Redirect(\"login.asp\")
end if

Sql = \"Select * FROM users WHERE username = \'\" & session(\"password-session\") & \"\'\"
\'set rs = rs.Execute(SQL)
%>


<form method=\"POST\" action=\"file:///E|/Inetpub/wwwroot/admin.asp?mode=update\">
<input type=\"hidden\" name=\"id\" size=\"20\" value=\"<%=RS(\"id\")%>\">
<div align=\"center\">
  <center>
      <table border=\"1\" width=\"170\" height=\"1\" bordercolor=\"#000000\">
        <tr>
          <td width=\"110\" height=\"11\">
            <input type=\"text\" name=\"dato\" size=\"20\" value=\"<%=RS(\"dato\")%>\">
          </td>
          <td width=\"110\" height=\"11\">
            <input type=\"text\" name=\"forfatter\" size=\"20\" value=\"<%=RS(\"forfatter\")%>\">
          </td>
        </tr>
        <tr>
          <td height=\"13\" colspan=\"2\">
            <textarea rows=\"3\" name=\"nyhed\" cols=\"37\"><%=RS(\"nyhed\")%></textarea>
          </td>
        </tr>
          <tr>
          <td width=\"110\" height=\"1\">Slet besked
            <input type=\"checkbox\" name=\"delete\" value=\"ON\">
          </td>
          <td width=\"110\" height=\"1\">
            <input type=\"submit\" value=\"opdater/slet\" name=\"send\">
          </td>
        </tr>
      </table>
  </center>
</div>
</form>
<%RS.MoveNext
Loop
end if

Conn.Close
Set Conn = Nothing%>
<% end if %>
<% if mode = \"update\" then %>
<%
Const adOpenKeyset = 1
Const adLockOptimistic = 3

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"nyheder.mdb\") & \";UID=admin;PWD=;\"

    Set rs = Server.CreateObject(\"ADODB.RecordSet\")
    strSQL = \"Select * FROM nyheder WHERE id=\" & request.form(\"id\")
    rs.Open strSQL, Conn, adOpenKeyset, adLockOptimistic
%>
<% if Request.form(\"delete\") = \"ON\" then
      Rs.delete
Response.Redirect \"admin.asp\"
%>
<% end if %>
<% 
    rs.Update
      rs(\"Dato\") = Request.form(\"Dato\")
      rs(\"forfatter\") = Request.form(\"forfatter\")
      rs(\"Email\") = Request.form(\"email\")
      rs(\"kommentar\") = Request.form(\"Kommentar\")
      rs.Update

    rs.Close
    Set rs = Nothing

Conn.Close
set Conn = Nothing

Response.Redirect \"admin.asp\"
%>
<% end if %>
Avatar billede kong7 Nybegynder
23. april 2001 - 16:17 #12
nute_> Ja Ja ja det ser man bare.. det er lige meget..
Avatar billede kong7 Nybegynder
23. april 2001 - 16:19 #13
*S*
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:22 #14
hjælp?
Avatar billede kong7 Nybegynder
23. april 2001 - 16:23 #15
lAV ET NYR mONDUL
Avatar billede keysersoze Guru
23. april 2001 - 16:25 #16
det første jeg faldt over er dette:

file:///E|/Inetpub/wwwroot/admin.asp?mode=update

det skal i hvert fald laves om!!!
Avatar billede keysersoze Guru
23. april 2001 - 16:25 #17
det første jeg faldt over er dette:

file:///E|/Inetpub/wwwroot/admin.asp?mode=update

det skal i hvert fald laves om!!!
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:25 #18
hhhmm nej... ? fordi det burde virke
Avatar billede nute Nybegynder
23. april 2001 - 16:26 #19
kong7 >> det er ikke spesielt konstruktive løsninger du kommer med !!

team_matrix >> kommer det ikke noen feilmeddelelser som vi kan bruke til noe debug ?
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:26 #20
til hvad?
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:27 #21
nej der kommer ikke fejlmeddelelser... kun den sjovt farvede tabel
Avatar billede nute Nybegynder
23. april 2001 - 16:28 #22
prøv å bytt det ut med:

action=\"admin.asp?mode=update\"

/nute
Avatar billede keysersoze Guru
23. april 2001 - 16:28 #23
har du et link hvor vi kan teste det? så er det da lide lettere så vi kan se hvad fejlen er!

men jeg ville starte med at lave dette

file:///E|/Inetpub/wwwroot/admin.asp?mode=update

om til dette:

admin.asp?mode=update
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:48 #24
hvis jeg retter: file:///E|/Inetpub/wwwroot/admin.asp?mode=update

til: admin.asp?mode=update

sker der det, at min hovedadminside bare bliver loadet igen
Avatar billede nute Nybegynder
23. april 2001 - 16:50 #25
er det ikke det du vil da ?
Avatar billede team_matrix Nybegynder
23. april 2001 - 16:55 #26
jo men den skulle også gerne opdatere :o)
Avatar billede nute Nybegynder
23. april 2001 - 16:56 #27
jammen det gjør den da....
Avatar billede keysersoze Guru
23. april 2001 - 16:59 #28
kan du ikke tage et screenshot eller på en eller anden anden måde give os en chance for at SE fejlen?
Avatar billede team_matrix Nybegynder
23. april 2001 - 17:02 #29
hovsa... nu virker det.... skulle bare lige genstarte lortet :o) det var nute som var først ude med svaret... point til dig
Avatar billede nute Nybegynder
23. april 2001 - 17:03 #30
takker :)
Avatar billede keysersoze Guru
23. april 2001 - 17:04 #31
hmmm - 16:25:48...

anyway
Avatar billede team_matrix Nybegynder
23. april 2001 - 17:05 #32
jeg spørger HVAD det skal laves om til, og det er nute den første som skriver....
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