Bruger skal kunne oprette en rubrik

Hej Marie.

Det lyder som en ret ligetil opgave.
Kan du ikke skrive hvad en annonce skal indeholde? Altså, ex. brugernavn, oprettelsesdato osv?

Så kan jeg hurtigt smide lidt kode sammen til dig.

Hej jps6kb
Jeg har været på ferie, derfor først nu....
Jeg har fået flikket grund koden sammen, men jeg vil god have field names med fra databasen, som overskrifter.
Hvordan gør jeg det?
Mit script ser sådan ud:
response.write "<TABLE width=1024px; border=1px; bordercolor=#99CCFF>"
Do
bcshift=not bcshift
if bcshift then
Bc = "1 px bccolor=#FFFFFF"
Bg = "bgcolor=#FFFFFF"
else
Bc = "1 px bccolor=#FFFFFF"
BG = "bgcolor=#FFFFFF"
end if

response.write "<TR " & BC & " ><td height=30>" & rs ("Navn") & "</TD><td height=30>" & rs("Efternavn") & "</TD><td height=30>" & rs("Telefon") & "</TD><td height=30>" & rs("Kategori") & "</TD><td height=30>" & rs("Price") & "</TD></TR>"

rs.MoveNext

Loop until rs.eof
response.write "</TABEL>"

Der er nogle der kan ;)

Jeg er ikke sikker på hvad du mener? Prøv lige at pensle det lidt ud ;)

Desuden.. burde der ikke være et style=" på den her?

response.write "<TABLE width=1024px; border=1px; bordercolor=#99CCFF>"



/Kim.

Når man har en database har den nogle field navne, dem vil jeg gerne have med ind på asp siden, som overskrifter.

Umiddelbart ved jeg det ikke, men du kan prøve at kigge på det her.. måske det hjælper ;)

http://p2p.wrox.com/topic.asp?TOPIC_ID=5270

Jeg har også fået anbefalet denne kode, men kan ikke få den til, at fungere sammen med det jeg har i forvejen. Det kan være du kan overskue det?
<table>
<tr>
<%
' Opret postsættet her (set rs = Conn.Execute(sql))

' Udskriv feltnavnene
For i = 0 to rs.Fields.Count - 1
%>
<th><%= rs(i).name %></th>
<% Next %>
</tr>
<%
Do While Not rs.EOF
%>
<tr>
<% For i = 0 to rs.Fields.Count -1 %>
<td><%= rs(i) %></td>
<% Next %>
</tr>
<%
rs.movenext
Loop
%>
</table>

<table>
<tr>
<%
' Opret postsættet her (set rs = Conn.Execute(sql))

Husker du at lave udtrækket her? Eller har du lavet udtrækket inden ?

' Udskriv feltnavnene
For i = 0 to rs.Fields.Count - 1
%>
<th><%= rs(i).name %></th>
<% Next %>
</tr>
<%
Do While Not rs.EOF
%>
<tr>
<% For i = 0 to rs.Fields.Count -1 %>
<td><%= rs(i) %></td>
<% Next %>
</tr>
<%
rs.movenext
Loop
%>
</table>

Den skal vel kombineres med den tabel jeg har i forvejen, ikke?

Jo, men du laver et udtræk hvor du får et resultset der hedder rs, ikke? Altså, et udtræk fra db'en?

Jo, det gør jeg

Okay.. hvad sker der så, når du viser siden? Kommer der en fejl?

Ja

Hvad står der?

Tænkte på.. hvorfor skriver du ikke bare feltnavnene? Du ved jo hvad de hedder, fordi du henter værdierne i dem umiddelbart efter?? :)

Kan du give mig et eksempel?

Ja,

<table>
<tr>
  <td>Navn:</td>
  <td><% = rs("navn") %></td>
</tr>
</table>

Bare sådan der..

Så vil der jo komme til at stå ex.    navn: Maria

Det er måske en mulighed. Jeg må gå videre med det i morgen. Vi snakkes ved.
Mvh. Marie

Jep.. det vil da klart være det nemmeste altså.. og mest brugte løsning.. hehe.. snakkes ;)

:-)
Jeg fuldfører altid mine projekter.
Så det bliver ikke ved snakken.

Øhhhh, det bliver først torsdag jeg kommer igen. :-)

Hej igen
Jeg har afprøvet det. Det kan godt lade sig gøre, men det virker ikke som jeg vil have det. Jeg vil have det skal stå oven over ikke ved siden af.

Okay.. det kommer lige her så ;)

<table>
<tr>
  <td>Navn</td>
  <td>Efternavn</td>
  <td>Telefon</td>
  <td>Kategori</td>
  <td>Pris</td>
</tr>

  <%
  while NOT rs.EOF
  %>

<tr>
  <td><% = rs("Navn") %></td>
  <td><% = rs("Efternavn") %></td>
  <td><% = rs("telefon") %></td>
  <td><% = rs("Kategori") %></td>
  <td><% = rs("Price") %></td>
</tr>

  <%
  rs.MoveNext
  Wend
  %>

</table>

Sådan der? :)

Jeg kan ikke få det til, at virke.

Kommer den med en fejl? Prøv lige at kopiere fejlen herind hvis den gør, og tjek at de eltnavne jeg har skrevet, passer med databasen ;)

*feltnavne

Error 500:100 :

ASP Code 0
Number -2146827255
Source response.write "<tr>
File /members/ad/person.asp
Line 79
Column 20
Description Unterminated string constant
ASP Description -
SQL Query -

Wauw.. prøv lige at skrive hele filen herinde ;)

Ved du hvad? Jeg tror, jeg prøver, at finde en løsning et andet sted. Du må godt få pointene hvis du vil.

Den fejl du får, er ikke fra det jeg har givet dig.. men jeg vil gerne se om jeg kan fikse det for dig ;)

Evt. bare smid linie 79 herind ;)

response.write "<tr>

Ahh.. jeg ser.. tror det er fordi du har lavet linieskift i din response..

Prøv at give mig et par linier over, og under ..

end if
      response.write "<tr>
  <td>Navn</td>

Jep.. prøv at skrive:

Response.Write "<tr><td>Navn</td>"

Så du afslutter på samme linie ;)

Ellers, så afslut ASP Scriptet efter    end if
og skrive tabellen som jeg gav dig den ;)


end if
%>

<table>
<tr> ....

Jeg kan ikke bruge det, desværre.