5 svar · 179 visningar · startad av Jacob
JAg har gjort en nyhetsdatabas som jag ska använda på min hemsida.
Men när jag lägger in något med HTML taggar så skrivs bara det ut text i databasen står det:
hej mitt namn är <b>Jacob</b>
och det skrivs ut likadant på hemsidan man jag vill ju att det ska se ut så här:
Hej mitt namn är Jacob
All hjälp är välkommen
Hur har du gått tillväga?
det låter som om du har en html-encode någonstans 
gör du några modifieringar av strängar antingen när du stoppar in dem i databasen, eller när du plockar ut dem?
OK MIn fil som ska visa databasen ser ut på följnade sätt:
<html>
<head>
<link rel="stylesheet" href="main_css.css">
<!-- #include file="adovbs.inc" -->
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\videomonitor\adressbok.mdb"
If Request.QueryString("ordning") = "text" Then
Set RecSet = Server.CreateObject("ADODB.Recordset")
If Request.QueryString("ordning") = "text" Then
Addera = "SELECT rubrik,datum,forfattare,texten,bildid FROM filmnyheter ORDER BY datum DESC"
End If
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic %>
</head>
<ul>
<% Do Until RecSet.EOF %>
<H1><% =RecSet("rubrik") %></H1><br>
<p><img src="file:///C:/Mina%20Hemsidor/Nya%20VM/bilder/<%=RecSet("bildid") %>"></p>
<% =RecSet("texten") %><br>
<% =RecSet("forfattare") %>
<% RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
End If %>
</ul>
</html>
Här kommer koden till inläggning:
<html>
<!-- #include file="adovbs.inc" -->
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=c:\inetpub\wwwroot\videomonitor\adressbok.mdb"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM filmnyheter"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
RecSet.AddNew
RecSet("rubrik") = Request.Form("Rubrik")
RecSet("datum") = Request.Form("Datum")
RecSet("forfattare") = Request.Form("Forfattare")
RecSet("texten") = Request.Form("Texten")
RecSet("bildid") = Request.Form("Bildid")
RecSet.Update
RecSet.Close
Connect.Close %>
Följande uppgifter har nu lagts till i databasen:<p>
Rubrik:<br><b><% =Request.Form("Rubrik") %></b><p>
Datum:<br><b><% =Request.Form("Datum") %></b><p>
Författare:<br><b><% =Request.Form("Forfattare") %></b><p>
Texten:<br><b><% =Request.Form("Texten") %></b><p>
Bildid:<br><b><% =Request.Form("Bildid") %></b><p>
Lägg till <a href="default.asp">fler nyheter</a>.
</html>
På något lustigt sätt så så löste det sig, Fråga mig inte hur för det har jag ingenarning om.
Tack för hjälen.