CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

ndh Nybegynder

30. august 2004 - 13:14 Der er 14 kommentarer

Kan ikke fjerne fed skrift fra variabel fra db

Jeg har en Access database, hvorfra jeg trækker en række data over i en tabel. Mit problem er nu, at alle dataene jeg trækker fra db over i tabellen skrives med fed, og det skal de ikke. Jeg har forsøgt at sætte tag´en ind alle steder uden held.
Hvad gør jeg galt?

Den berørte del af koden ser således ud:

Response.Write "<table border='1' "
Response.Write " cellPadding='0' "
Response.Write " cellSpacing='5'>"

Response.Write "<tr><th>Nyoptagelser</th><th>S/H</th><th>Dias</th><th>Farveneg.</th></tr>"
Response.Write "<tr><th>24X36</th><th>" & rs("nyop24sh") & "</th><th>" & rs("nyop24dias") & "</th><th>" & rs("nyop24farve") & "</th></tr>"
Response.Write "<tr><th>6X6</th><th>" & rs("nyop6sh") & "</th><th>" & rs("nyop6dias") & "</th><th>" & rs("nyop6farve") & "</th></tr>"
Response.Write "<tr><th>Digital</th></tr>"

Synes godt om

fennec Nybegynder

30. august 2004 - 13:23 #1

1. Er der HTML kode i teksten fra databasen, for det kan komme herfra?
2. Har du et stylesheat (CSS) som definere fed skrift på tabeller eller td'er?

Synes godt om

ndh Nybegynder

30. august 2004 - 13:32 #2

Jeg har intet stylesheet og jeg har lukket alle bold tags i min html.

Det underlige er tilmed at jeg godt kan rette de udtrukne data til fx kursiv

Synes godt om

fennec Nybegynder

30. august 2004 - 13:42 #3

Det er lige meget om du lukker dem, hvis de bliver åbnet igen i teksten fra databasen.

En tekst fra databasen kunne f.eks være:
"En tekst.og lidt mere.Og endnu engang.Denne er også fed"

Så hjælper det ikke at sætte foran da den bliver åbnet igen. Og som du kan se er der er flere måder at lave fed skrift på. Men sætter du en kursiv omkring denne tekst, bliver det hele kursiv.

Synes godt om

ndh Nybegynder

30. august 2004 - 13:47 #4

Hvordan vil du da foreslå, at jeg fx fjerner det fra flg. del af kode?:

Response.Write "<tr><th>24X36</th><th>" & rs("nyop24sh") & "</th><th>" & rs("nyop24dias") & "</th><th>" & rs("nyop24farve") & "</th></tr>"

Synes godt om

fennec Nybegynder

30. august 2004 - 13:54 #5

Vi skal først have fundet ud af om det komme fra databasen. Så hvad indeholder rs("nyop24sh"), rs("nyop24dias") og rs("nyop24farve")

Har du evt et link til hvor det kan ses, det vil være nemmere, da problemet også kan komme fra andre steder.

Også ville jeg nok sætte noget style i stedet for at bruge FONT tag'et.

Synes godt om

ndh Nybegynder

30. august 2004 - 14:00 #6

Har desværre ikke et link, da jeg anvender min egen pc, som webserver lige nu.
rs("nyop24sh"), rs("nyop24dias") og rs("nyop24farve") kan både indeholde tal og bogstaver og helt almindelig tekst der ligger i et text-felt i en accessdb

Synes godt om

ndh Nybegynder

30. august 2004 - 14:02 #7

Rent syntaktisk. Hvordan sætter jeg korrekt ind i nedenstående del af koden
" & rs("nyop24sh") & "

Synes godt om

fennec Nybegynder

30. august 2004 - 14:18 #8

Den rigtige syntax er:

response.write "..."& rs("nyop24sh") & "..."

Men det løser ikke problemet hvis der er HTML kode i databasen, eller det bliver lavet på en anden måde. F.eks eller med style.

Kan du ikke smide hele koden herind, medmindre du da tør give mig dit IP nummer, så jeg kan se siderne.

Synes godt om

ndh Nybegynder

30. august 2004 - 14:21 #9

Hele koden ser således ud:

<% Response.Buffer = true %>
<%
if Session("logon") = 0 then response.redirect ("index.asp")
%>
<%
strtid = Request("id")
Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM fototabel WHERE"
strSQL = strSQL & " (tid LIKE '%" & strtid & "%')"

strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("foto.mdb")
rs.Open strSQL, strDSN, 1

If Not (rs.BOF Or rs.EOF) Then
%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<HTML><HEAD><TITLE>Fotobestilling</TITLE>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2722.900" name=GENERATOR></HEAD>
<BODY text=#000000 bgColor=#ffffff topmargin="0" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF">
<blockquote>
<div align="left">
 
Bestillingsblanket
nr.:
<%REsponse.write "" & rs("id") & ""%>
<%REsponse.write ""%>

Institution:
<%REsponse.write "" & rs("institution") & ""%>
 
Initialer: 
<%REsponse.write "" & rs("initialer") & ""%>

Afl.
til fotograf d.:
<%REsponse.write "" & rs("afl") & ""%>
 
Ønskes færdig d.:
<%REsponse.write "" & rs("onsket") & ""%>

Bestiller 
<%REsponse.write "" & rs("fornavn") & " "%>
<%REsponse.write "" & rs("efternavn") & " "%>
 
<%REsponse.write "" & rs("vej") & " "%>
<%REsponse.write "" & rs("vejnr") & ""%>
 
<%REsponse.write "" & rs("postnr") & " "%>
<%REsponse.write "" & rs("city") & ""%>
 
Tlf.:
<%REsponse.write "" & rs("telefon") & ""%>
/
<%REsponse.write "" & rs("mobil") & ""%>
 
Email:
<%REsponse.write "" & rs("email") & ""%>

Type
af bestilling 

<% if rs("fotobestilling") = "fotobestilling" then
Response.Write "Fotobestilling "
End if
%>
<% if rs("andet") = "andet" then
Response.Write "Andet "
End if
%>
<% if rs("lan") = "lan" then
Response.Write "Lån "
End if
%>


<% if rs("copyright") = "copyright" then
Response.Write "Bemærk copyright fotograf "
End if
%>


<% if len(rs("bemaerkningbestil")) > 0 then
Response.Write "Bemærkninger til bestilling "
REsponse.write "" & rs("bemaerkningbestil") & ""
End if
%>


<% if len(rs("affoto24sh")) OR len(rs("affoto24dias")) OR len(rs("affoto24farve")) OR len(rs("affoto6sh")) OR len(rs("affoto6dias")) OR len(rs("affoto6farve")) OR len(rs("affotodigital")) > 0 then
Response.Write "<table border='1' "
Response.Write " cellPadding='0' "
Response.Write " cellSpacing='5'>"

Response.Write "<tr><th>Affotografering</th><th>S/H</th><th>Dias</th><th>Farveneg.</th></tr>"
Response.Write "<tr><th>24X36</th><th><align='left'>" & rs("affoto24sh") & "</th><th>" & rs("affoto24dias") & "</th><th>" & rs("affoto24farve") & "</th></tr>"
Response.Write "<tr><th>6X6</th><th>" & rs("affoto6sh") & "</th><th>" & rs("affoto6dias") & "</th><th>" & rs("affoto6farve") & "</th></tr>"
Response.Write "<tr><th>Digital</th>"
If rs("affotodigital") = "affotodigital" then
Response.Write "<th>ja</th></tr>"
else
Response.Write "</tr>"
end if
end if

%>

<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>

<% if len(rs("nyop24sh")) OR len(rs("nyop24dias")) OR len(rs("nyop24farve")) OR len(rs("nyop6sh")) OR len(rs("nyop6dias")) OR len(rs("nyop6farve")) OR len(rs("nyopdigital")) > 0 then
Response.Write "<table border='1' "
Response.Write " cellPadding='0' "
Response.Write " cellSpacing='5'>"

Response.Write "<tr><th>Nyoptagelser</th><th>S/H</th><th>Dias</th><th>Farveneg.</th></tr>"
Response.Write "<tr><th>24X36</th><th>" & rs("nyop24sh") & "</th><th>" & rs("nyop24dias") & "</th><th>" & rs("nyop24farve") & "</th></tr>"
Response.Write "<tr><th>6X6</th><th>" & rs("nyop6sh") & "</th><th>" & rs("nyop6dias") & "</th><th>" & rs("nyop6farve") & "</th></tr>"
Response.Write "<tr><th>Digital</th>"
If rs("nyopdigital") = "nyopdigital" then
Response.Write "<th>ja</th></tr>"
end if
end if
%>

<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>
 
<% if len(rs("bemaerkningoptagelse")) > 0 then
Response.Write "Bemærkninger til optagelse "
REsponse.write "" & rs("bemaerkningoptagelse") & ""
End if
%>


<%
if len(rs("kontaktsh")) OR len(rs("kontaktfarve")) OR len(rs("tish")) OR len(rs("trettensh")) OR len(rs("attensh")) OR len(rs("fireogtyvesh")) OR len(rs("tredivesh")) OR len(rs("fyrresh")) OR len(rs("halvtressh")) OR len(rs("andetsh")) OR len(rs("tifarve")) OR len(rs("trettenfarve")) OR len(rs("attenfarve")) OR len(rs("fireogtyvefarve")) OR len(rs("tredivefarve")) OR len(rs("fyrrefarve")) OR len(rs("halvtresfarve")) OR len(rs("andetfarve")) > 0 then
Response.Write "<table border='1' "
Response.Write " cellPadding='0' "
Response.Write " cellSpacing='5'>"

Response.Write "<tr><th>PRINT</th><th>S/H</th><th>Farve</th></tr>"
Response.Write "<tr><th>Kontaktkopi</th><th>" & rs("Kontaktsh") & "</th><th>" & rs("kontaktfarve") & "</th></tr>"
Response.Write "<tr><th>10X15</th><th>" & rs("tish") & "</th><th>" & rs("tifarve") & "</th></tr>"
Response.Write "<tr><th>13X18</th><th>" & rs("trettensh") & "</th><th>" & rs("trettenfarve") & "</th></tr>"
Response.Write "<tr><th>18X24</th><th>" & rs("attensh") & "</th><th>" & rs("attenfarve") & "</th></tr>"
Response.Write "<tr><th>24X30</th><th>" & rs("fireogtyvesh") & "</th><th>" & rs("fireogtyvefarve") & "</th></tr>"
Response.Write "<tr><th>30X40</th><th>" & rs("tredivesh") & "</th><th>" & rs("tredivefarve") & "</th></tr>"
Response.Write "<tr><th>40X50</th><th>" & rs("fyrresh") & "</th><th>" & rs("fyrrefarve") & "</th></tr>"
Response.Write "<tr><th>50X60</th><th>" & rs("halvtressh") & "</th><th>" & rs("halvtresfarve") & "</th></tr>"
Response.Write "<tr><th>Andet</th><th>" & rs("andetsh") & "</th><th>" & rs("andetfarve") & "</th></tr>"

end if
%>

<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>

<%
if len(rs("tifsh")) OR len(rs("tiffarve")) OR len(rs("jpegsh")) OR len(rs("jpegfarve")) OR len(rs("andetformatsh")) OR len(rs("andetformatfarve")) OR len(rs("oplosning")) OR len(rs("dimensionpixels")) OR len(rs("dimensioncm")) > 0 then
Response.Write "<table border='1' "
Response.Write " cellPadding='0' "
Response.Write " cellSpacing='5'>"

Response.Write "<tr><th>DIGITAL</th><th>S/H</th><th>Farve</th></tr>"
Response.Write "<tr><th>TIFF</th>"
If rs("tifsh") = "tifsh" then
Response.Write "<th>ja</th>"
end if
If rs("tiffarve") = "tiffarve" then
Response.Write "<th>ja</th>"
end if
Response.Write "</tr>"

Response.Write "<tr><th>JPEG</th>"
If rs("jpegsh") = "jpegsh" then
Response.Write "<th>ja</th>"
end if
If rs("jpegfarve") = "jpegfarve" then
Response.Write "<th>ja</th>"
end if
Response.Write "</tr>"

Response.Write "<tr><th>Andet format</th><th>" & rs("andetformatsh") & "</th><th>" & rs("andetformatfarve") & "</th></tr>"
Response.Write "<tr><th>Opløsning</th><th>" & rs("Oplosning") & "</th></tr>"
Response.Write "<tr><th>Dimensioner pixels/cm</th><th>" & rs("dimensionpixels") & "</th><th>" & rs("dimensioncm") & "</th></tr>"
end if
%>

<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>

<% if len(rs("bemaerkningprint")) > 0 then
Response.Write "Bemærkninger til print/optagelse "
REsponse.write "" & rs("bemaerkningprint") & ""
End if
%>

<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>

<% if len(rs("fireogtyvefilm")) OR len(rs("seksfilm")) > 0 then
Response.Write "Fremkaldelse af film "
if len(rs("fireogtyvefilm")) > 0 then
Response.Write "24X36: "
REsponse.write "" & rs("fireogtyvefilm") & ""
end if
if len(rs("seksfilm")) > 0 then
Response.Write " 6X6: "
REsponse.write "" & rs("seksfilm") & ""
end if
End if
%>
</div>
</blockquote>

 </BODY></HTML>
<%End If
rs.Close
Set rs = Nothing

%>

Synes godt om

fennec Nybegynder

30. august 2004 - 14:33 #10

Det var ellers en stak kode, også vil jeg endag have lidt mere :o)

Kan du ikke smide kilde koden fra browseren (fra en side med fejl) ind også.

Synes godt om

busschou Praktikant

30. august 2004 - 14:37 #11

Jeg er ikke helt 100 klog på asp
Men er det ikke muligt bare at lave en replace?
altså noget ala
nyop24sh = Replace( nyop24sh , "", "" )
eller
nyop24sh = Replace( nyop24sh , "", "" )
og så udskrive de nye hvor strengen er fjernet?

Synes godt om

ndh Nybegynder

30. august 2004 - 14:40 #12

Kildekode fra browser:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<HTML><HEAD><TITLE>Fotobestilling</TITLE>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.2722.900" name=GENERATOR></HEAD>
<BODY text=#000000 bgColor=#ffffff topmargin="0" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF">
<blockquote>
<div align="left">
 
Bestillingsblanket
nr.:
131

Institution:
Byhistorisk Arkiv
 
Initialer: 


Afl.
til fotograf d.:
30-08-2004
 
Ønskes færdig d.:
13-09-2004

Bestiller 
 
 
 
 
 
 
Tlf.:

/

 
Email:


Type
af bestilling 

Fotobestilling 








<table border='1' cellPadding='0' cellSpacing='5'><tr><th>Affotografering</th><th>S/H</th><th>Dias</th><th>Farveneg.</th></tr><tr><th><style='verdana' size='3' color='#000000'>24X36</th><th><align='left'>iiuiui</th><th>uiuiui</th><th></th></tr><tr><th>6X6</th><th>uii</th><th>iui</th><th></th></tr><tr><th>Digital</th></tr>

<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>



<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>
 





<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>



<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>



<table width="0" border="0">
<tr>
<td></td>
</tr>
</table>

</div>
</blockquote>

 </BODY></HTML>

Synes godt om

fennec Nybegynder

30. august 2004 - 15:04 #13

Det er fordi du bruger <th> taget. Du skal bruge <td> i stedet.

<th> (Table Header) bruges til at lave "overskrift" på tabeller og er pr defination med fed. <td> er en almindelig celle og har ingen formatering.

Brug altid <td> taget da du selv kan formatere teksten/cellen som du har lyst.

Synes godt om

busschou Praktikant

04. april 2005 - 08:43 #14

ndh >> lukketid ? ;o)

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	0	07/11/202415:34	-
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

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

Alle kategorier på Eksperten

Seneste artiklerRSS