Avatar billede sesam Nybegynder
17. januar 2002 - 15:36 Der er 41 kommentarer og
1 løsning

Hvad betyder denne fejl?

Hvad betyder denne fejl?

Fejltype:
Microsoft JET Database Engine (0x80004005)
Søgenøglen blev ikke fundet i nogen poster

Det jeg prøver på er at gemme en bunke html kode i en acces database, det kan jeg godt gøre en gang men hvis jeg vil opdatere koden online selvfølgelig, får jeg denne fejl...

Her er koden
------------------------------------------------
<!--#include file =\"include/common.asp\"-->
<html>
<head>
    <title>Test</title>
    <style>
    BODY
        {
        FONT-FAMILY: Verdana;FONT-SIZE: xx-small;
        }
    TABLE
        {
        FONT-SIZE: xx-small;
        FONT-FAMILY: Tahoma
        }
    </style>
</head>
<%
dim intDocumentID
dim strTitle
dim strContent
dim adoCn
dim strSQL
set adoCn = Server.CreateObject(\"ADODB.Connection\")
adoCn.Open strConn
if Request.QueryString(\"action\") = \"save\" then
    strTemplate = Request.Form(\"txtContent\")
    strSQL = \"Update tblTemplate set Template=\'\" & replace(strTemplate,\"\'\",\"\'\'\") & \"\' where id=1\"\'kun en skabelon
    adoCn.Execute strSQL
else
    dim adoRs
    set adoRs = Server.CreateObject(\"ADODB.Recordset\")
    strSQL = \"Select * From tblTemplate where id=1\" \'kun en skabelon
    set adoRs = adoCn.Execute(strSQL)
    If not adoRs.EOF then
        strTemplate = adoRs(\"Template\")
    End If
    adoRs.Close
    set adoRs = nothing
end if
adoCn.Close
set adoCn = nothing
%>
<body link=Blue vlink=MediumSlateBlue alink=MediumSlateBlue>
<table border=0 cellpadding=0 cellspacing=0 width=90% align=center>
    <tr>
        <td valign=top align=center>
            <b>Rediger skabelon</b>
        </td>
    </tr>
    <tr>
        <td height=20></td>
    </tr>
    <tr>
        <td valign=top><a href=\"default.asp?cat=<%=request(\"cat\")%>\">Tilbage til dokument oversigten</a>
        </td>
    </tr> 
</table>

<br>

<form method=\"post\" action=\"admin_TemplateEdit.asp?action=save&cat=<%=request(\"cat\")%>\" name=\"SaveForm\" ID=Form1>
<table border=0 cellpadding=2 cellspacing=0 width=90% align=center>
<tr>
<td valign=top colspan=2 align=center>
    <TEXTAREA style=\"width=100%\" rows=20 id=txtContent name=txtContent><%=strTemplate%></TEXTAREA>
</td>
</tr>
<tr>
<td align=right>
    <a href=\"admin_TmplView.asp\" target=_NEW>Se skabelon</a>
    <INPUT type=\"submit\" value=\"Save\" id=submit1 name=submit1>
</td>
</tr> 
</table>
</form>
</body>
</html>
Avatar billede invisibleman Nybegynder
17. januar 2002 - 15:38 #1
Er du sindssygt da ... AAALT for mange point !!
Avatar billede sesam Nybegynder
17. januar 2002 - 15:41 #2
Kan du hjælpe mig så er det dine...
Avatar billede trumf Nybegynder
17. januar 2002 - 15:43 #3
Avatar billede sesam Nybegynder
17. januar 2002 - 15:48 #4
Nej desværre
Avatar billede cool_casper Nybegynder
17. januar 2002 - 16:04 #5
Er du helt sikker på at du har en kolone der hedder Template ??!1
Avatar billede sesam Nybegynder
17. januar 2002 - 16:08 #6
Yes
Avatar billede cool_casper Nybegynder
17. januar 2002 - 16:11 #7
Hvilken linie?!
Kunne vi få noget mere af fejlmedelelsen?!?
Avatar billede sesam Nybegynder
17. januar 2002 - 16:13 #8
Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access-driver] Søgenøglen blev ikke fundet i nogen poster.

LINIE 28
Avatar billede cool_casper Nybegynder
17. januar 2002 - 16:18 #9
Prøv at rykke kommentaren ned og udskrive SQL\'en:
strSQL = \"Update tblTemplate set Template=\'\" & replace(strTemplate,\"\'\",\"\'\'\") & \"\' where id=1\"
\'kun en skabelon
Response.Write strSQl
Response.End

Hvad udskriver den så?!? Jeg er tror måske at din replace fucker op i det...
Avatar billede cesil Nybegynder
17. januar 2002 - 16:21 #10
For mig at se er der noget galt hvor du danner dine databaseobjecter. Du opretter 2 objekter, et inde i din else og en uden for. Jeg tror du bruger det forkerte object inde i din else.

prøv det her istedet:

set adoCn = Server.CreateObject(\"ADODB.Connection\")
adoCn.Open strConn
dim adoRs
set adoRs = Server.CreateObject(\"ADODB.Recordset\")

if Request.QueryString(\"action\") = \"save\" then
    strTemplate = Request.Form(\"txtContent\")
    strSQL = \"Update tblTemplate set Template=\'\" & replace(strTemplate,\"\'\",\"\'\'\") & \"\' where id=1\"\'kun en skabelon
    adoCn.Execute strSQL
else
    strSQL = \"Select * From tblTemplate where id=1\" \'kun en skabelon
    set adoRs = adoCn.Execute(strSQL)
    If not adoRs.EOF then
        strTemplate = adoRs(\"Template\")
    End If
    adoRs.Close
    set adoRs = nothing
end if
adoCn.Close
set adoCn = nothing
Avatar billede sesam Nybegynder
17. januar 2002 - 16:26 #11
cool casper: Nu kan den godt opdatere men nu viser den siden og den skulle egentlige bare gemme det i databasen og blive på samme side...
Avatar billede cool_casper Nybegynder
17. januar 2002 - 16:29 #12
Det ved jeg godt det var bare for at se hvad der står i strSQL... Hvad står der...?? Det den udskriver på siden hvis du vil gemme...!
Avatar billede sesam Nybegynder
17. januar 2002 - 16:31 #13
Jeg er ikke helt med...?
Avatar billede cool_casper Nybegynder
17. januar 2002 - 16:36 #14
variabel strSQL, den du skriver UPDATE table SET osv. i! Jeg tror der er en fejl i den. Derfor skal du skrive
Response.Write strSQL \'Udskriver variablen!
Response.End \'Stopper scriptet!

Hvis du så prøver at gemme vil den bare skrive: Update tblTemplate set .....
Og i det kan vi se om der er en fejl... Det som den udskriver, skal du skrive her. Så kan vi se om der er en fejl i det.....!
Forstår du nu??
Avatar billede sesam Nybegynder
17. januar 2002 - 16:41 #15
Måske er jeg med:
-------------------------------------------
Nå jeg trykker save kommer siden frem med denne kode.
-------------------------------------------

<html>
<head>
    <title>Test</title>
    <style>
    BODY
        {
        FONT-FAMILY: Verdana;FONT-SIZE: xx-small;
        }
    TABLE
        {
        FONT-SIZE: xx-small;
        FONT-FAMILY: Tahoma
        }
    </style>
</head>
Update tblTemplate set Template=\'<!doctype html public \"-//W3C//DTD HTML 4.0//EN\">
<html>
<head>
  <title>test</title>
<link href=\"styles.css\" rel=\"stylesheet\" type=\"text/css\"><link rel=\"STYLESHEET\" type=\"text/css\" href=\"css/lt.css\">
</head>
<body background=\"bg.gif\" topmargin=\"0\" leftmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">
<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\">
  <tr>
       
    <td width=\"100%\" background=\"bg.gif\" bgcolor=\"#000000\" valign=\"MIDDLE\" align=\"LEFT\">
      <a href=\"forside.php\"><img src=\"images/logotop.gif\" width=\"200\" height=\"72\" border=\"0\"></a><br>
    </td>
  </tr>
  <tr>
       
    <td height=\"19\" width=\"100%\" background=\"bg.png\">
      <a href=\"index.asp?id=46\"><img src=\"images/profil.gif\" width=\"48\" height=\"21\" border=\"0\"></a><a href=\"index.asp?id=47\"><img src=\"images/produkter.gif\" width=\"79\" height=\"21\" border=\"0\"></a><a href=\"index.asp?id=48\"><img src=\"images/kontakt.gif\" width=\"67\" height=\"21\" border=\"0\"></a><a href=\"rekvirer.asp\"><img src=\"images/rekvirer.gif\" width=\"154\" height=\"21\" border=\"0\"></a>
      <br>
    </td>
  </tr>
  <tr>
       
    <td bgcolor=\"#FFFFFF\" width=\"100%\">
      <table border=\"0\" width=\"760\" cellpadding=\"0\" cellspacing=\"0\" align=\"LEFT\" bgcolor=\"#FFFFFF\">
        <tr>
                <td width=\"650\" valign=\"TOP\">
                <table border=\"0\" width=\"650\" cellpadding=\"0\" cellspacing=\"0\">
                <tr>
                    <td width=\"10\"> 
                           
                    </td>
                    <td align=\"LEFT\" width=\"100%\" valign=\"TOP\">
                <font class=\"brod\">
                <br>
                <br>
[%CONTENT%]
</font>
<br>
<br>
<br>
<br></td>
                </tr>
                </table>
                </td>   
           
            </tr>
        <tr>
       
          <td valign=\"BOTTOM\"><img src=\"images/stoleset.jpg\" width=\"204\" height=\"104\" border=\"0\" alt=\"\"><br>
        </td>
            </tr>
            </table>
    </td>
  </tr>
  <tr>
       
    <td bgcolor=\"#FFFFFF\" width=\"100%\" background=\"bg.gif\">
      <a href=\"mailto:lt@lt-collection.dk\"><img src=\"images/addresse.gif\" width=\"770\" height=\"22\" border=\"0\"></a><br>
    </td>
  </tr>
</table>

</body>
</html>\' where id=1
Avatar billede sesam Nybegynder
17. januar 2002 - 17:23 #16
Har jeg forstået det eller hvad?
Avatar billede cool_casper Nybegynder
17. januar 2002 - 17:34 #17
Ikke helt prøv at sætte det ind som din fil:


<!--#include file =\"include/common.asp\"-->
<html>
<head>
    <title>Test</title>
    <style>
    BODY
        {
        FONT-FAMILY: Verdana;FONT-SIZE: xx-small;
        }
    TABLE
        {
        FONT-SIZE: xx-small;
        FONT-FAMILY: Tahoma
        }
    </style>
</head>
<%
dim intDocumentID
dim strTitle
dim strContent
dim adoCn
dim strSQL
set adoCn = Server.CreateObject(\"ADODB.Connection\")
adoCn.Open strConn
if Request.QueryString(\"action\") = \"save\" then
    strTemplate = Request.Form(\"txtContent\")
    strSQL = \"Update tblTemplate set Template=\'\" & replace(strTemplate,\"\'\",\"\'\'\") & \"\' where id=1\"
    \'kun en skabelon
    Response.Write strSQL
    Response.End
    adoCn.Execute strSQL
else
    dim adoRs
    set adoRs = Server.CreateObject(\"ADODB.Recordset\")
    strSQL = \"Select * From tblTemplate where id=1\" \'kun en skabelon
    set adoRs = adoCn.Execute(strSQL)
    If not adoRs.EOF then
        strTemplate = adoRs(\"Template\")
    End If
    adoRs.Close
    set adoRs = nothing
end if
adoCn.Close
set adoCn = nothing
%>
<body link=Blue vlink=MediumSlateBlue alink=MediumSlateBlue>
<table border=0 cellpadding=0 cellspacing=0 width=90% align=center>
    <tr>
        <td valign=top align=center>
            <b>Rediger skabelon</b>
        </td>
    </tr>
    <tr>
        <td height=20></td>
    </tr>
    <tr>
        <td valign=top><a href=\"default.asp?cat=<%=request(\"cat\")%>\">Tilbage til dokument oversigten</a>
        </td>
    </tr> 
</table>

<br>

<form method=\"post\" action=\"admin_TemplateEdit.asp?action=save&cat=<%=request(\"cat\")%>\" name=\"SaveForm\" ID=Form1>
<table border=0 cellpadding=2 cellspacing=0 width=90% align=center>
<tr>
<td valign=top colspan=2 align=center>
    <TEXTAREA style=\"width=100%\" rows=20 id=txtContent name=txtContent><%=strTemplate%></TEXTAREA>
</td>
</tr>
<tr>
<td align=right>
    <a href=\"admin_TmplView.asp\" target=_NEW>Se skabelon</a>
    <INPUT type=\"submit\" value=\"Save\" id=submit1 name=submit1>
</td>
</tr> 
</table>
</form>
</body>
</html> 
Avatar billede cool_casper Nybegynder
17. januar 2002 - 17:37 #18
Og prøv at skrive der står på siden når du skal gemme...
Avatar billede sesam Nybegynder
17. januar 2002 - 17:38 #19
Og hvad så?
Avatar billede sesam Nybegynder
17. januar 2002 - 17:38 #20
Det her:
-----------------------------

<html>
<head>
    <title>Test</title>
    <style>
    BODY
        {
        FONT-FAMILY: Verdana;FONT-SIZE: xx-small;
        }
    TABLE
        {
        FONT-SIZE: xx-small;
        FONT-FAMILY: Tahoma
        }
    </style>
</head>

<body link=Blue vlink=MediumSlateBlue alink=MediumSlateBlue>
<table border=0 cellpadding=0 cellspacing=0 width=90% align=center>
    <tr>
        <td valign=top align=center>
            <b>Rediger skabelon</b>
        </td>
    </tr>
    <tr>
        <td height=20></td>
    </tr>
    <tr>
        <td valign=top><a href=\"default.asp?cat=0\">Tilbage til dokument oversigten</a>
        </td>
    </tr> 
</table>

<br>

<form method=\"post\" action=\"admin_TemplateEdit.asp?action=save&cat=0\" name=\"SaveForm\" ID=Form1>
<table border=0 cellpadding=2 cellspacing=0 width=90% align=center>
<tr>
<td valign=top colspan=2 align=center>
    <TEXTAREA style=\"width=100%\" rows=20 id=txtContent name=txtContent><!doctype html public \"-//W3C//DTD HTML 4.0//EN\">
<html>
<head>
  <title>L.T. Collection A/S</title>
<link href=\"styles.css\" rel=\"stylesheet\" type=\"text/css\"><link rel=\"STYLESHEET\" type=\"text/css\" href=\"css/lt.css\">
</head>
<body background=\"bg.gif\" topmargin=\"0\" leftmargin=\"0\" marginwidth=\"0\" marginheight=\"0\">
<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\" width=\"100%\">
  <tr>
       
    <td width=\"100%\" background=\"bg.gif\" bgcolor=\"#000000\" valign=\"MIDDLE\" align=\"LEFT\">
      <a href=\"forside.php\"><img src=\"images/logotop.gif\" width=\"200\" height=\"72\" border=\"0\"></a><br>
    </td>
  </tr>
  <tr>
       
    <td height=\"19\" width=\"100%\" background=\"bg.png\">
      <a href=\"index.asp?id=46\"><img src=\"images/profil.gif\" width=\"48\" height=\"21\" border=\"0\"></a><a href=\"index.asp?id=47\"><img src=\"images/produkter.gif\" width=\"79\" height=\"21\" border=\"0\"></a><a href=\"index.asp?id=48\"><img src=\"images/kontakt.gif\" width=\"67\" height=\"21\" border=\"0\"></a><a href=\"rekvirer.asp\"><img src=\"images/rekvirer.gif\" width=\"154\" height=\"21\" border=\"0\"></a>
      <br>
    </td>
  </tr>
  <tr>
       
    <td bgcolor=\"#FFFFFF\" width=\"100%\">
      <table border=\"0\" width=\"760\" cellpadding=\"0\" cellspacing=\"0\" align=\"LEFT\" bgcolor=\"#FFFFFF\">
        <tr>
                <td width=\"650\" valign=\"TOP\">
                <table border=\"0\" width=\"650\" cellpadding=\"0\" cellspacing=\"0\">
                <tr>
                    <td width=\"10\">&nbsp;
                           
                    </td>
                    <td align=\"LEFT\" width=\"100%\" valign=\"TOP\">
                <font class=\"brod\">
                <br>
                <br>
[%CONTENT%]
</font>
<br>
<br>
<br>
<br></td>
                </tr>
                </table>
                </td>   
           
            </tr>
        <tr>
       
          <td valign=\"BOTTOM\"><img src=\"images/stoleset.jpg\" width=\"204\" height=\"104\" border=\"0\" alt=\"\"><br>
        </td>
            </tr>
            </table>
    </td>
  </tr>
  <tr>
       
    <td bgcolor=\"#FFFFFF\" width=\"100%\" background=\"bg.gif\">
      <a href=\"mailto:lt@lt-collection.dk\"><img src=\"images/addresse.gif\" width=\"770\" height=\"22\" border=\"0\"></a><br>
    </td>
  </tr>
</table>

</body>
</html></TEXTAREA>
</td>
</tr>
<tr>
<td align=right>
    <a href=\"admin_TmplView.asp\" target=_NEW>Se skabelon</a>
    <INPUT type=\"submit\" value=\"Save\" id=submit1 name=submit1>
</td>
</tr> 
</table>
</form>
</body>
</html> 
Avatar billede cool_casper Nybegynder
17. januar 2002 - 17:41 #21
Din action er ikke gem! Så ville du ikke få det der...
Avatar billede sesam Nybegynder
17. januar 2002 - 17:44 #22
Hvad skal jeg så rette?
Avatar billede cool_casper Nybegynder
17. januar 2002 - 18:04 #23
Du skal IKKE rette noget!!
Du skriver if Request.QueryString(\"action\") = \"save\" then
Derfor skal du skrive filnavn.asp?action=save
Avatar billede sesam Nybegynder
17. januar 2002 - 18:08 #24
Undskyld jeg er lidt dum kan du ikke putte det ind for mig eller sige hvor jeg skal skrive det...
Avatar billede cool_casper Nybegynder
17. januar 2002 - 18:12 #25
Den form hvor der bliverskrevet i der peger hen på denne fil vi arbejder med, i den fil skal <FORM ACTION=\"\" skal der være ?action=save på.... Forstår du nu!??
Avatar billede sesam Nybegynder
17. januar 2002 - 18:14 #26
Det står da ogsp:
--------------------------------
<form method=\"post\" action=\"admin_TemplateEdit.asp?action=save&cat=<%=request(\"cat\")%>\" name=\"SaveForm\" ID=Form1>
Avatar billede sesam Nybegynder
17. januar 2002 - 18:25 #27
Kan du fikse det eller?
Avatar billede cool_casper Nybegynder
17. januar 2002 - 18:52 #28
To sek....
Avatar billede sesam Nybegynder
17. januar 2002 - 18:54 #29
ok
Avatar billede cool_casper Nybegynder
17. januar 2002 - 19:01 #30
Prøv med den her:
-----------------START------------------------------
<!--#include file =\"include/common.asp\"-->
<html>
<head>
    <title>Test</title>
    <style>
    BODY
        {
        FONT-FAMILY: Verdana;FONT-SIZE: xx-small;
        }
    TABLE
        {
        FONT-SIZE: xx-small;
        FONT-FAMILY: Tahoma
        }
    </style>
</head>
<%
dim intDocumentID
dim strTitle
dim strContent
dim adoCn
dim strSQL
set adoCn = Server.CreateObject(\"ADODB.Connection\")
adoCn.Open strConn
if Request.QueryString(\"action\") = \"save\" then
    strTemplate = Request.Form(\"txtContent\")
    str_somereplace = replace(strTemplate,\"\'\",\"\'\'\")
    strSQL = \"UPDATE tblTemplate SET Template = \'\" & str_somereplace & \"\' where (id = 1)\"
    \'kun en skabelon
\'    Response.Write strSQL
\'    Response.End
    adoCn.Execute strSQL
else
    dim adoRs
    set adoRs = Server.CreateObject(\"ADODB.Recordset\")
    strSQL = \"SELECT * FROM tblTemplate WHERE (id = 1)\"
    \'kun en skabelon
    set adoRs = adoCn.Execute(strSQL)
    If not adoRs.EOF then
        strTemplate = adoRs(\"Template\")
    End If
    adoRs.Close
    set adoRs = nothing
end if
adoCn.Close
set adoCn = nothing
%>
<body link=Blue vlink=MediumSlateBlue alink=MediumSlateBlue>
<table border=0 cellpadding=0 cellspacing=0 width=90% align=center>
    <tr>
        <td valign=top align=center>
            <b>Rediger skabelon</b>
        </td>
    </tr>
    <tr>
        <td height=20></td>
    </tr>
    <tr>
        <td valign=top><a href=\"default.asp?cat=<%=request(\"cat\")%>\">Tilbage til dokument oversigten</a>
        </td>
    </tr> 
</table>

<br>

<form method=\"post\" action=\"admin_TemplateEdit.asp?action=save&cat=<%=request(\"cat\")%>\" name=\"SaveForm\" ID=Form1>
<table border=0 cellpadding=2 cellspacing=0 width=90% align=center>
<tr>
<td valign=top colspan=2 align=center>
    <TEXTAREA style=\"width=100%\" rows=20 id=txtContent name=txtContent><%=strTemplate%></TEXTAREA>
</td>
</tr>
<tr>
<td align=right>
    <a href=\"admin_TmplView.asp\" target=_NEW>Se skabelon</a>
    <INPUT type=\"submit\" value=\"Save\" id=submit1 name=submit1>
</td>
</tr> 
</table>
</form>
</body>
</html> 

------------------SLUT---------------------------------
Hvad står der i strConn variablen !??!
Avatar billede sesam Nybegynder
17. januar 2002 - 19:04 #31
samme fejl:

strConn = \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"database/document.mdb\")
Avatar billede cool_casper Nybegynder
17. januar 2002 - 19:20 #32
Jeg ved altså ikke rigtig hvad der galt...
Hvorfor laver du en replace(strTemplate,\"\'\",\"\'\'\")
Prøv at lave en ny database med de samme felter og kun en post... Det kan godt være databasen der fucker up!
Avatar billede sesam Nybegynder
17. januar 2002 - 19:40 #33
Ja jeg fatter det heller ikke men det virker stadigvæk ikke. Jeg fatter ikke at den ikke bare kan skifte indholdet ud en simpel opdatering...øvøv
Avatar billede cool_casper Nybegynder
17. januar 2002 - 19:46 #34
Det gør jeg heller ikke.... den er rimelig simpel....
Prøv at fjerne den linie hvor der står:
strsomereplace = replace(strTemplate,\"\'\",\"\'\'\")
Og skriv denne istedet:
strsomereplace = strTemplate

Avatar billede sesam Nybegynder
17. januar 2002 - 19:54 #35
Desværre samme fejl....
Avatar billede cool_casper Nybegynder
17. januar 2002 - 19:58 #36
Sikke noget pis.... Vil du give mig tid til imorgen til at lave et helt andet script til dig... ??Så laver jeg det i nat...
Avatar billede sesam Nybegynder
17. januar 2002 - 20:23 #37
Ja selvfølgelig hvis du vil er jeg taknemmelig...
Avatar billede cool_casper Nybegynder
17. januar 2002 - 20:24 #38
Jeg skal prøve... Så må vi se om det virker....!
Avatar billede coltau Juniormester
19. januar 2002 - 22:08 #39
Undskyld jeg blander mig - men ellers ser det ud til at i kan blive ved længe. Jeg kopierede den oprindelige kode og med to ændringer kørte det upåklageligt.

For at tage udgangspunkt i den oprindelige fejl:

Microsoft JET Database Engine (0x80004005)
Søgenøglen blev ikke fundet i nogen poster

Den fejl fremkommer \"måske\" fordi der aldrig bliver oprettet en post i databasen. Det er også som fejlen siger. Man kan ikke opdatere en post der ikke findes. (id=1)

DB-Koden skal derfor ændres til nedenstående:

dim adoCn
dim strSQL
dim adoRs
set adoCn = Server.CreateObject(\"ADODB.Connection\")
adoCn.Open strConn
set adoRs = Server.CreateObject(\"ADODB.Recordset\")
strSQL = \"Select ID From tblTemplate where id=1\"
set adoRs = adoCn.Execute(strSQL)
if Request.QueryString(\"action\") = \"save\" then
  strTemplate = replace(Request.Form(\"txtContent\"),\"\'\",\"\'\'\")
  if adoRs.EOF then
    strSQL = \"insert into tblTemplate (Template) values (\'\" & strTemplate & \"\');\"
  else
    strSQL = \"Update tblTemplate set Template=\'\" & strTemplate & \"\' where id=1\"\'kun en skabelon
  end if
  adoCn.Execute strSQL
else
  strSQL = \"Select * From tblTemplate where id=1\" \'kun en skabelon
  set adoRs = adoCn.Execute(strSQL)
  If not adoRs.EOF then
    strTemplate = adoRs(\"Template\")
  End If
  set adoRs = nothing
end if
adoCn.Close
set adoCn = nothing

Den anden fejl er at der mangler apostroffer omkring (txtContent) i html-koden. (Hvis ikke vil html-koden ikke blive gemt i databasen.)

Linien:
    <TEXTAREA style=\"width=100%\" rows=20 id=txtContent name=txtContent><%=strTemplate%></TEXTAREA>

ændres til:

    <TEXTAREA style=\"width=100%\" rows=20 id=\"txtContent\" name=\"txtContent\"><%=strTemplate%></TEXTAREA>

Så køre det bare.
Avatar billede sesam Nybegynder
28. januar 2002 - 16:34 #40
Desværre det virker heller ikke...
Avatar billede sesam Nybegynder
29. januar 2002 - 23:00 #41
Lukker sprgsmålet...
Takker mange gange for de ihærdige forsøg på at jælpe mig...
Avatar billede sesam Nybegynder
04. februar 2002 - 18:20 #42
Fejlen ligger i at notat feltet i Accesdatabasen ikke kan opdateres hvis der er over 1800 tegn...Bugger
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