Notifikationer

Markér alle som læst Log ud

shosho500 Nybegynder

04. juli 2005 - 11:27 Der er 11 kommentarer og
1 løsning

loop without do ?

Forstår ikke helt hvad fejlen er her:

<html>
<head>
<title>Tagwall</title>
</head>

<body bgcolor="#000000" text="#ffffff">

<font face="verdana, arial, helvetica, sans-serif" size="1">

<table width=302 border=0 bgcolor=#000000 font face="verdana, arial, helvetica, sans-serif" size="1">
<tr>
<td align=center>
<table cellspacing="0" cellpadding="0" border="0" width =300 bgcolor=#000000>
<tr>
<td class="fed"><%=rs("name")%></td>
</tr>
<tr>
<td class="fed" valign="top"><%=rs("text")%></td>
</tr>
</table>

</td>
</tr>

</table>

<%
rs.MoveNext
loop
myConn.Close
Set myConn = Nothing
%>

</body>
</html>

Synes godt om

busschou Praktikant

04. juli 2005 - 11:36 #1

Din fejl er du har det her
-----
<%
rs.MoveNext
loop
myConn.Close
Set myConn = Nothing
%>
------
Uden at have en Do While eller noget før...du har ingen asp kode før denne
Så du skal enten fjerne det, eller også indsætte passende kode

Synes godt om

busschou Praktikant

04. juli 2005 - 11:36 #2

Du må have noget mere asp kode?
For ellers er "<%=rs("name")%>" også tom mm

Synes godt om

busschou Praktikant

04. juli 2005 - 11:39 #3

altså, fejlen er konkret at du i asp koden har et loop uden først have en do
Men helt generelt burde du have noget i stil med
-----
<html>
<head>
<title>Tagwall</title>
</head>

<body bgcolor="#000000" text="#ffffff">

<font face="verdana, arial, helvetica, sans-serif" size="1">
<%
//oprettelse af database forbindelse
set rs = conn.execute("Select * From tag_tabel Order By Navn")
Do While Not rs.Eof
%>
<table width=302 border=0 bgcolor=#000000 font face="verdana, arial, helvetica, sans-serif" size="1">
<tr>
<td align=center>
<table cellspacing="0" cellpadding="0" border="0" width =300 bgcolor=#000000>
<tr>
<td class="fed"><%=rs("name")%></td>
</tr>
<tr>
<td class="fed" valign="top"><%=rs("text")%></td>
</tr>
</table>

</td>
</tr>

</table>

<%
rs.MoveNext
loop
myConn.Close
Set myConn = Nothing
%>

</body>
</html>

Synes godt om

busschou Praktikant

04. juli 2005 - 11:40 #4

det var blot for at illustrere det :o)
Det kommer selfølgelig an på din tabel/database struktur, samt på hvordan du vil have det ser ud i layoutet
Kan også se at den asp kode jeg har indsat er indsat en <table> for højt så at sige :o)

Synes godt om

shosho500 Nybegynder

04. juli 2005 - 11:42 #5

jeg har en add tag side hvor man skriver name og tekst og et write dokument og den kode her, er så der hvor den skal skrive name og text, som bliver trukket ud fra en database

Synes godt om

shosho500 Nybegynder

04. juli 2005 - 11:43 #6

Mit tagwall_add.asp :

<style type="text/css">
BODY {
font-family : Tahoma;
font-size : 12px;
text-decoration : none;
color : #FF9933;
background-color : Black;
text-align : center;
}
</style>

<span align = center>
<form action="tagwall_write.asp" method=post>
Name:<br> <input type=text size="20" name="name"><br>
Commment:<br><textarea cols=40 rows=10 name="text"></textarea><br><br>
<input type = "submit" value = "Add">
</form>
</span>

Synes godt om

shosho500 Nybegynder

04. juli 2005 - 11:43 #7

Mit tagwall_write.asp :

<%

Response.buffer = true

'opretter forbindelse
Const adOpenKeyset = 1
Const adLockOptimistic = 3
Conn = "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("tagwall.mdb") & ";UID=admin;PWD=;"
Set rs = Server.CreateObject("ADODB.RecordSet")
Query = ("SELECT * FROM tagwall")
rs.Open Query, Conn, adOpenKeyset, adLockOptimistic

'fix ved ingen indtastning
name = Request.form("name")
if name = "" then
name = "N/A"
else
name = Request.form("name")
end if

text = Request.form("text")
if text = "" then
text = "This site is the best ever!"
else
text = Request.form("text")
end if

'Gemmer i databasen
rs.AddNew
rs("name") = name
rs("text") = text
rs.Update
rs.Close
Set rs = Nothing

Response.Redirect("tagwall_main.asp")
%>

Synes godt om

shosho500 Nybegynder

04. juli 2005 - 11:44 #8

og så det øverste, som mit tagwall_main.asp

Synes godt om

busschou Praktikant

04. juli 2005 - 11:51 #9

ok jeg kender ikke så meget til den måde at åbne en database på
Jeg ville selv gøre sådan her
-----
<html>
<head>
<title>Tagwall</title>
</head>

<body bgcolor="#000000" text="#ffffff">

<font face="verdana, arial, helvetica, sans-serif" size="1">

<table width=302 border=0 bgcolor=#000000 font face="verdana, arial, helvetica, sans-serif" size="1">
<%
'opretter forbindelse
Set Conn = Server.CreateObject("ADODB.Connection")
DNS = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("tagwall.mdb")
Conn.Open DNS
Conn.Execute("Select * From tagwall")
Do While Not rs.Eof
%>
<tr>
<td align=center>
<table cellspacing="0" cellpadding="0" border="0" width =300 bgcolor=#000000>
<tr>
<td class="fed"><%=rs("name")%></td>
</tr>
<tr>
<td class="fed" valign="top"><%=rs("text")%></td>
</tr>
</table>

</td>
</tr>

<%
rs.MoveNext
loop
myConn.Close
Set myConn = Nothing
%>
</table>
</body>
</html>

Synes godt om

busschou Praktikant

04. juli 2005 - 11:52 #10

Det burde virke :o)
Det eneste er at connectionen måske skal se lidt anderledes ud i dit tilfælde

Synes godt om

shosho500 Nybegynder

04. juli 2005 - 11:53 #11

det har noget og gøre med min main side, der hvor jeg prøver at hente name og text fra databasen.

Synes godt om

busschou Praktikant

04. juli 2005 - 11:55 #12

Ja netop, jeg har jo indsat en databaseforbindelse i din main side
Og sat loopet igang med en Do While
Uden en databaseforbindelse kan du jo ikke hente name og text ;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
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
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

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