Avatar billede axl_rose Nybegynder
24. oktober 2003 - 12:04 Der er 19 kommentarer og
1 løsning

Font & størrelse sættes ind i streng

Hej hvordan sætter
man font verdana og størrelse 7pt ind i denne streng

Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD><FONT><B>" & rs("overskrift") & "</B></FONT><BR><FONT SIZE=""2""> Dato " & rs("dato") & "</FONT><BR><FONT>" & rs("nyhed") & "</FONT><BR><FONT SIZE=""7pt"">Forfatter: " & rs("forfatter") & "</FONT></TD></TR></TABLE><BR>"
Avatar billede solja Nybegynder
24. oktober 2003 - 12:10 #1
Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD><FONT face=""Verdana"" size=""7""><B>" & rs("overskrift") & "</B></FONT><BR><FONT face=""Verdana"" size=""7""> Dato " & rs("dato") & "</FONT><BR><FONT>" & rs("nyhed") & "</FONT><BR><FONT face=""Verdana"" size=""7"">Forfatter: " & rs("forfatter") & "</FONT></TD></TR></TABLE><BR>"
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 12:26 #2
Det virker ikke se her www.krellers.dk/soundavenue_dk/news/ klik så på en af nyhederne

hele filen ser sådan ud

<% Response.Buffer = True %>
<HTML>
<HEAD>
<!-- Minus AutoDato -->
    <TITLE>Nyheds system.</TITLE>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
</HEAD>
<BODY BGCOLOR="#000000" TEXT="#FFFFFF" LINK="#FFFFFF" VLINK="#FFFFFF" ALINK="#FFFFFF">
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
If Request.QueryString("id") <> "" Then
    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM nyheder WHERE (ID = " & Request.QueryString("id") & ")"
    rs.Open strSQL, myConn, 1, 3
    If Not (rs.BOF Or rs.EOF) Then
    Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD><FONT face=""Verdana"" size=""7""><B>" & rs("overskrift") & "</B></FONT><BR><FONT face=""Verdana"" size=""7""> Dato " & rs("dato") & "</FONT><BR><FONT>" & rs("nyhed") & "</FONT><BR><FONT face=""Verdana"" size=""7"">Forfatter: " & rs("forfatter") & "</FONT></TD></TR></TABLE><BR>"        rs.Update
        rs.Close
        myConn.Close
        Set rs = Nothing
        Set myConn = Nothing
    End If
End If
%>
<center>
<font face="Verdana" style="font-size: 7pt">
<A HREF="java script:history.back(1)" TARGET="_top" style="text-decoration: none">
<font color="#FF9900">T</font>ilbage</A></font></center>
</BODY>
</HTML>
Avatar billede mm12010 Nybegynder
24. oktober 2003 - 12:31 #3
Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD style=""font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 7pt;""><strong>" & rs("overskrift") & "</strong><BR> Dato " & rs("dato") & "<BR>" & rs("nyhed") & "<BR>Forfatter: " & rs("forfatter") & "</TD></TR></TABLE><BR>" %>
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 12:35 #4
mm12010 >> Det virker heller ikke
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 12:38 #5
Se selv
Avatar billede mm12010 Nybegynder
24. oktober 2003 - 12:49 #6
denne virker hos mig:

<%
Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD style=""font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 7pt;""><strong>" & rs("overskrift") & "</strong><BR> Dato " & rs("dato") & "<BR>" & rs("nyhed") & "<BR>Forfatter: " & & rs("forfatter") & & "</TD></TR></TABLE><BR>"
%>
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 12:56 #7
nu har skrevet det du lige har forslået se så her http://www.krellers.dk/soundavenue_dk/news/
Avatar billede mm12010 Nybegynder
24. oktober 2003 - 13:00 #8
selvfølgelig uden <% %> hvis det allerede står i asp-tags :o)
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:02 #9
??
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:03 #10
<% %>  de er fjernet nu kommer der syntax error
Avatar billede mm12010 Nybegynder
24. oktober 2003 - 13:04 #11
<% Response.Buffer = True %>
<HTML>
<HEAD>
<!-- Minus AutoDato -->
    <TITLE>Nyheds system.</TITLE>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
</HEAD>
<BODY BGCOLOR="#000000" TEXT="#FFFFFF" LINK="#FFFFFF" VLINK="#FFFFFF" ALINK="#FFFFFF">
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
If Request.QueryString("id") <> "" Then
    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM nyheder WHERE (ID = " & Request.QueryString("id") & ")"
    rs.Open strSQL, myConn, 1, 3
    If Not (rs.BOF Or rs.EOF) Then
    Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD style=""font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 7pt;""><strong>" & rs("overskrift") & "</strong><BR> Dato " & rs("dato") & "<BR>" & rs("nyhed") & "<BR>Forfatter: " & & rs("forfatter") & & "</TD></TR></TABLE><BR>"
        rs.Update
        rs.Close
        myConn.Close
        Set rs = Nothing
        Set myConn = Nothing
    End If
End If
%>
<center>
<font face="Verdana" style="font-size: 7pt">
<A HREF="java script:history.back(1" TARGET="_top" style="text-decoration: none">
<font color="#FF9900">T</font>ilbage</A></font></center>
</BODY>
</HTML>
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:11 #12
Det virkede heller ikke, Nu har jeg fjernet det der med font og så kan du se hvordan den ser ud uden fejl http://www.krellers.dk/soundavenue_dk/news/

men den må jo skulle ind et sted!
Avatar billede mm12010 Nybegynder
24. oktober 2003 - 13:14 #13
hvordan ser kode så ud?
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:16 #14
sådan her!


<% Response.Buffer = True %>
<HTML>
<HEAD>
<!-- Minus AutoDato -->
    <TITLE>Nyheds system.</TITLE>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
</HEAD>
<BODY BGCOLOR="#000000" TEXT="#FFFFFF" LINK="#FFFFFF" VLINK="#FFFFFF" ALINK="#FFFFFF">
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
If Request.QueryString("id") <> "" Then
    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM nyheder WHERE (ID = " & Request.QueryString("id") & ")"
    rs.Open strSQL, myConn, 1, 3
    If Not (rs.BOF Or rs.EOF) Then
      Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD><FONT><B>" & rs("overskrift") & "</B></FONT><BR><FONT SIZE=""2""> Dato " & rs("dato") & "</FONT><BR><FONT>" & rs("nyhed") & "</FONT><BR><FONT SIZE=""2"">Forfatter: " & rs("forfatter") & "</FONT></TD></TR></TABLE><BR>"
        rs.Update
        rs.Close
        myConn.Close
        Set rs = Nothing
        Set myConn = Nothing
    End If
End If
%>
<center>
<font face="Verdana" style="font-size: 7pt">
<A HREF="java script:history.back(1)" TARGET="_top" style="text-decoration: none">
<font color="#FF9900">T</font>ilbage</A></font></center>
</BODY>
</HTML>
Avatar billede solja Nybegynder
24. oktober 2003 - 13:23 #15
<% Response.Buffer = True %>
<HTML>
<HEAD>
<!-- Minus AutoDato -->
    <TITLE>Nyheds system.</TITLE>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
</HEAD>
<BODY BGCOLOR="#000000" TEXT="#FFFFFF" LINK="#FFFFFF" VLINK="#FFFFFF" ALINK="#FFFFFF">
<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
If Request.QueryString("id") <> "" Then
    Set rs = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM nyheder WHERE (ID = " & Request.QueryString("id") & ")"
    rs.Open strSQL, myConn, 1, 3
    If Not (rs.BOF Or rs.EOF) Then
%>
<table width="100%" border="0" bgcolor="#000000" bordercolor="#000000">
  <tr valign="top">
    <td style="font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 7pt;"><strong><% response.write(rs("overskrift")) %></strong><br> Dato <% response.write(rs("dato")) %><br><% response.write(rs("nyhed")) %><br>Forfatter: <% response.write(rs("forfatter")) %></td>
  </tr>
</table>
<br>
<%
        rs.Update
        rs.Close
        myConn.Close
        Set rs = Nothing
        Set myConn = Nothing
    End If
End If
%>
<center>
<font face="Verdana" style="font-size: 7pt">
<A HREF="java script:history.back(1" TARGET="_top" style="text-decoration: none">
<font color="#FF9900">T</font>ilbage</A></font></center>
</BODY>
</HTML>
Avatar billede mm12010 Nybegynder
24. oktober 2003 - 13:24 #16
Response.write "<TABLE WIDTH=""100%"" BORDER=""0"" BGCOLOR=""#000000"" BORDERCOLOR=""#000000""><TR VALIGN=""top""><TD style=""font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 7pt;""><strong>" & rs("overskrift") & "</strong><BR> Dato " & rs("dato") & "<BR>" & rs("nyhed") & "<BR>Forfatter: " & rs("forfatter") & "</TD></TR></TABLE><BR>"
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:24 #17
Mange tak!
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:29 #18
Solja kender du dette script? http://www.s2a.dk/source_show.asp?id=631 det er den der er brugt?
Avatar billede solja Nybegynder
24. oktober 2003 - 13:33 #19
tak for point :)
nej jeg kender ikke det script..
Avatar billede axl_rose Nybegynder
24. oktober 2003 - 13:35 #20
oki helt iorden, men igen tak
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