|
|
 | problem med at læse fra en database
Fra : thagemann89 |
Dato : 16-07-04 17:56 |
|
Hey!
jeg har et lille problem med at læse fra en database...
Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
Et objekt er obligatorisk: ''
/eksempel2.asp, line 10
-----------------------------------------
<% @ LANGUAGE="VBSCRIPT"%>
<!--#include file="forbindelse.asp" -->
<html>
<body>
<%
strSQL = "SELECT * FROM nyheder ORDER by ID DESC"
Set rs = Conn.Execute("strSQL")
Do
IF rs.EOF THEN
Response.Write("<p>Ingen nyheder endnu!</p>")
ELSE
Response.Write("<p>")
Response.Write("<b><u>")
Response.Write rs("overskrift")
Response.Write("</u></b><br><br>")
sNews = replace(Rs("nyhed"),vblf,"<br>")
Response.Write sNews
Response.Write("<br><br>")
Response.Write("<b><u>")
Response.Write rs("navn")
Response.Write(" - ")
Response.Write rs("dato")
Response.Write("</u></b><hr size=1 color=#000000></p>")
rs.MoveNext
END IF
Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>
</body>
</html>
------------------------------------
håber der er en eller flere som vil give mig lidt hjælp...
på forhånd Tak!
MVH
thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
 Martin Jørgensen (16-07-2004)
| Kommentar
Fra : Martin Jørgensen |
Dato : 16-07-04 18:30 |
|
thagemann89 wrote in dk.edb.internet.webdesign.serverside.asp:
> Hey!
>
> jeg har et lille problem med at læse fra en database...
>
> Fejltype:
> Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
> Et objekt er obligatorisk: ''
> /eksempel2.asp, line 10
>
> -----------------------------------------
>
> <% @ LANGUAGE="VBSCRIPT"%>
>
> <!--#include file="forbindelse.asp" -->
>
> <html>
> <body>
>
> <%
> strSQL = "SELECT * FROM nyheder ORDER by ID DESC"
> Set rs = Conn.Execute("strSQL")
> Do
> IF rs.EOF THEN
> Response.Write("<p>Ingen nyheder endnu!</p>")
> ELSE
>
> Response.Write("<p>")
> Response.Write("<b><u>")
> Response.Write rs("overskrift")
> Response.Write("</u></b><br><br>")
> sNews = replace(Rs("nyhed"),vblf,"<br>")
> Response.Write sNews
> Response.Write("<br><br>")
> Response.Write("<b><u>")
> Response.Write rs("navn")
> Response.Write(" - ")
> Response.Write rs("dato")
> Response.Write("</u></b><hr size=1 color=#000000></p>")
> rs.MoveNext
> END IF
> Loop While Not rs.EOF
>
> Conn.Close
> Set Conn = Nothing
> %>
>
>
> </body>
> </html>
>
> ------------------------------------
>
> håber der er en eller flere som vil give mig lidt hjælp...
>
> på forhånd Tak!
>
> MVH
> thomas
Hej Thomas
Prøv at skriv denne kode:
DO WHILE NOT rs.EOF Then
i stedet for denne kode
Do
IF rs.EOF THEN
Håber at det virker.
Mvh
Martin Jørgensen
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
finn elmgaard (16-07-2004)
| Kommentar
Fra : finn elmgaard |
Dato : 16-07-04 18:39 |
|
"thagemann89" <thomas@intelligent-design.dk> wrote in message
news:40f8089a$0$23874$14726298@news.sunsite.dk...
> jeg har et lille problem med at læse fra en database...
>
> Fejltype:
> Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
> Et objekt er obligatorisk: ''
> /eksempel2.asp, line 10
>
> -----------------------------------------
>
> <% @ LANGUAGE="VBSCRIPT"%>
>
> <!--#include file="forbindelse.asp" -->
>
> <html>
> <body>
>
> <%
> strSQL = "SELECT * FROM nyheder ORDER by ID DESC"
> Set rs = Conn.Execute("strSQL")
> Do
>
Nu er det lidt svært at se, hvad der er linie 10, men den fejl du får opstår
typisk, hvis der ikke er oprettet en connection til databasen. Det kan vi
ikke se, om der er, men vi kan gætte på, at det måske sker i din include
file? Det er nok der, fejlen skal findes.
Iøvrigt skal du fjerne citationstegn, så du skriver: Set rs =
Conn.Execute(strSQL)
mvh
Finn
| |
thagemann89 (16-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 16-07-04 21:38 |
|
Hey!
Jeg prøvede Martin's forslag med DO WHILE NOT rs.EOF Then
Men det skabte en ny fejl:
Fejltype:
Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0400)
En sætning var ventet
/eksempel2.asp, line 12, column 20
DO WHILE NOT rs.EOF Then
-------------------^
DO WHILE NOT rs.EOF Then <<< Linie 12
Set rs = Conn.Execute("strSQL") <<< det er linie 10 :)
Og her er min databaseforbindelse:
<%
Set database = Server.CreateObject ("ADODB.Connection")
database.open ("Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=h:\inetpub\wwwroot\data.mdb")
%>
MVH
Thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
 Martin Jørgensen (16-07-2004)
| Kommentar
Fra : Martin Jørgensen |
Dato : 16-07-04 22:01 |
|
thagemann89 wrote in dk.edb.internet.webdesign.serverside.asp:
> Hey!
>
> Jeg prøvede Martin's forslag med DO WHILE NOT rs.EOF Then
> Men det skabte en ny fejl:
>
> Fejltype:
> Der opstod en Microsoft VBScript-kompileringsfejl (0x800A0400)
> En sætning var ventet
> /eksempel2.asp, line 12, column 20
> DO WHILE NOT rs.EOF Then
> -------------------^
>
> DO WHILE NOT rs.EOF Then <<< Linie 12
>
> Set rs = Conn.Execute("strSQL") <<< det er linie 10 :)
>
> Og her er min databaseforbindelse:
>
> <%
>> Set database = Server.CreateObject ("ADODB.Connection")
>> database.open ("Provider=Microsoft.Jet.OLEDB.4.0; Data
>> Source=h:\inetpub\wwwroot\data.mdb")
>> %>
>
> MVH
> Thomas
Hej Thomas
Hvad laver din database ude i wwwroot roden?
Man plejer at lægge databasen inde i en mappe f.eks.
Set database = Server.CreateObject ("ADODB.Connection")
database.open ("Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=h:\inetpub\wwwroot\test\data.mdb")
Mvh
Martin Jørgensen
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Martin Jørgensen (17-07-2004)
| Kommentar
Fra : Martin Jørgensen |
Dato : 17-07-04 00:44 |
|
thagemann89 wrote in dk.edb.internet.webdesign.serverside.asp:
> Og her er min databaseforbindelse:
>
<%
Set database = Server.CreateObject ("ADODB.Connection")
database.open ("Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=h:\inetpub\wwwroot\data.mdb")
%>
>
> MVH
> Thomas
Hej Thomas
Jeg har måske en mere løsning, efter den første ikke virkede.
Prøv at bruge denne i stedet for din egen:
<%
Set database = Server.CreateObject("ADODB.Connection")
database.Open "DRIVER={Microsoft Access Driver (*.mdb)}; Data
Source=h:\inetpub\wwwroot\data.mdb")
%>
Mvh
Martin Jørgensen
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
finn elmgaard (17-07-2004)
| Kommentar
Fra : finn elmgaard |
Dato : 17-07-04 08:41 |
|
"thagemann89" <thomas@intelligent-design.dk> wrote in message
news:40f83ca9$0$23869$14726298@news.sunsite.dk...
> Hey!
>
> Set rs = Conn.Execute("strSQL") <<< det er linie 10 :)
>
> Og her er min databaseforbindelse:
>
> <%
> Set database = Server.CreateObject ("ADODB.Connection")
> database.open ("Provider=Microsoft.Jet.OLEDB.4.0; Data
> Source=h:\inetpub\wwwroot\data.mdb")
> %>
>
Hej Thomas
Som tidligere nævnt er fejlen din databaseforbindelse.
Det objekt du opretter hedder database (set database =
Server.Create.Object.......)
Men du forsøger at bruge et objekt, som du kalder conn (Set rs =
Conn.Execute.....), som du tilsyneladende ikke har oprettet nogen steder.
Så prøv at ændre "database" til "conn" i din databaseforbindelse, altså
Set conn = Server.CreateObject ("ADODB.Connection")
conn.open ("Provider=Microsoft.Jet.OLEDB.4.0; ............
mvh
Finn
| |
thagemann89 (17-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 17-07-04 12:34 |
|
Nu virker det næsten... jeg får læst fra databsen og det hele men nedenunder
hvor nyheden står, står der:
Fejltype: Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8) Et
objekt er obligatorisk: '' /eksempel2.asp, line 10
Set rs = Conn.Execute(strSQL) <<< Linie 10 - stadig den linie der er noget
galt med - men alt andet ser ud til at virke fint så tusinde tak for alt
hjælp!
Mvh
Thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
thagemann89 (17-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 17-07-04 12:36 |
|
ok.. min skyld havde kommet til at kopiere noget fejltekst ind i filen...
så alt virker nu! :D
tusinde tak for hjælpen!
mvh
Thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
thagemann89 (17-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 17-07-04 12:50 |
|
ok.. jeg har lige et allersidste problem... :/
det er på min side hvor jeg tilføjer nyheder til databasen.
Fejltype:
Microsoft JET Database Engine (0x80004005)
Handlingen skal bruge en opdaterbar forespørgsel.
/tilfoejnyhed.asp, line 14
Conn.Execute(strSQL) <<< Linie 14
mvh
Thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
finn elmgaard (17-07-2004)
| Kommentar
Fra : finn elmgaard |
Dato : 17-07-04 14:04 |
|
"thagemann89" <thomas@intelligent-design.dk> wrote in message
news:40f9127c$0$23868$14726298@news.sunsite.dk...
> ok.. jeg har lige et allersidste problem... :/
>
> det er på min side hvor jeg tilføjer nyheder til databasen.
>
> Fejltype:
> Microsoft JET Database Engine (0x80004005)
> Handlingen skal bruge en opdaterbar forespørgsel.
> /tilfoejnyhed.asp, line 14
>
> Conn.Execute(strSQL) <<< Linie 14
Prøv at se http://asp-faq.dk/article/?id=4
mvh
Finn
| |
thagemann89 (17-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 17-07-04 14:52 |
|
jeg har prøvet at lægge databasen ind i _private mappen og givet
adgang til skriverettigheder... men der kommer stadig samme fejl
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Martin Jørgensen (17-07-2004)
| Kommentar
Fra : Martin Jørgensen |
Dato : 17-07-04 18:18 |
|
thagemann89 wrote in dk.edb.internet.webdesign.serverside.asp:
> jeg har prøvet at lægge databasen ind i _private mappen og
givet
> adgang til skriverettigheder... men der kommer stadig samme
fejl
Hej thagemann89
Det er fordi at du ikke har rettigheder til at skrive i din
database.
Det kan du ændre ved at højre klikke på din database fil og vælge
egenskaber,
der efter skulle der gerne være et punkt som hedder "Sikkerhed"
og der kan du
vælge om der skal være skrive rettigheder på databasen.
Du skriver ikke om hvilket styresystem du bruger, i Win 2000 og
Win 2003 er
det ligesom det er for oven.
Mens i Win XP Pro skal du Klikke på "Funktioner" i en mappe, og
"Mappeindstilinger..." derefter vælge "Vis", fjern fluebenet i
boxen hvor at
der står "Brug enkel fildeling (anbefales)", og derefter er det
lige som for
oven.
Håber at du kan bruge disse oplysninger.
Mvh
Martin Jørgensen
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
thagemann89 (18-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 18-07-04 12:49 |
|
> Du skriver ikke om hvilket styresystem du bruger, i Win 2000 og
> Win 2003 er
> det ligesom det er for oven.
> Mens i Win XP Pro skal du Klikke på "Funktioner" i en mappe, og
> "Mappeindstilinger..." derefter vælge "Vis", fjern fluebenet i
> boxen hvor at
> der står "Brug enkel fildeling (anbefales)", og derefter er det
> lige som for
> oven.
Jeg bruger win xp pro, men i hvilken mappe mener du at jeg skal
klikke på funktioner? hvis det er mapperne inde i wwwroot så findes
der ikke en knap som hedder funktioner...
mvh
thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Martin Jørgensen (18-07-2004)
| Kommentar
Fra : Martin Jørgensen |
Dato : 18-07-04 15:39 |
|
thagemann89 wrote in dk.edb.internet.webdesign.serverside.asp:
> Jeg bruger win xp pro, men i hvilken mappe mener du at jeg skal
> klikke på funktioner? hvis det er mapperne inde i wwwroot så findes
> der ikke en knap som hedder funktioner...
>
> mvh
> thomas
Hej Thomas
Jeg har lavet en lille film, som viser dug hvad jeg mener.
http://www.darkskies.dk/rettigheder.html
Håber at du kan se hvad jeg mener.
Mvh
Martin Jørgensen
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
thagemann89 (18-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 18-07-04 17:18 |
|
ahhh! nu virker det.... tusinde tak for filmen og alt hjælp... :)
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Jens Gyldenkærne Cla~ (16-07-2004)
| Kommentar
Fra : Jens Gyldenkærne Cla~ |
Dato : 16-07-04 22:18 |
|
thagemann89 skrev:
> Jeg prøvede Martin's forslag med DO WHILE NOT rs.EOF Then
> Men det skabte en ny fejl:
Ikke så mærkeligt - Martins forslag er ikke gyldig kode. Der
blandes to forskellige konstruktioner:
a) IF [udtryk] Then
b) DO [udtryk]
Det reserverede ord "Then" hører til en if-sætning og skal ikke
bruges i en Do-løkke. Martins forslag bør derfor rettes til:
Do WHILE NOT rs.EOF
' Gør noget for hver datapost
' Fx en udskrift:
Response.write rs("navn") & "<br>"
' Flyt til næste post
rs.movenext
' Slut på løkken:
Loop
Men det er stadig ikke nok til at få din side til at køre.
> Set rs = Conn.Execute("strSQL") <<< det er linie 10 :)
Linjen her er - som Finn har påpeget - forkert. Når du sætter
anførselstegn om strSQL beder du databasen om at udføre kommandoen
"strSQL". Det er ikke en databasekommando og du får ikke noget
brugbart ud på denne måde.
Det du er ude efter, er at få databasen til at udføre den kommando
der er gemt i _variablen_ strSQL - derfor skal der stå følgende:
Set rs = Conn.Execute(strSQL)
Når der ikke er anførselstegn er det variablen strSQL der henvises
til - og det er den du skal bruge her.
NB: Det er svært at se præcis hvad du svarer på når du ikke citerer
noget.
Læs gerne siden her: < http://html.dk/nyhedsgrupper/usenet.asp>
(afsnittet "Gælder der nogle regler for nyhedsgrupperne?") - eller
evt. bare min signatur.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html
| |
thagemann89 (16-07-2004)
| Kommentar
Fra : thagemann89 |
Dato : 16-07-04 23:34 |
|
Tusinde tak for alt hjælp indtil nu, men siden vil stadig ikke
virke...
Fejltype:
Der opstod en Microsoft VBScript-kørselsfejl (0x800A01A8)
Et objekt er obligatorisk: ''
/eksempel2.asp, line 10
strSQL = "SELECT * FROM nyheder ORDER by ID DESC"
Set rs = Conn.Execute(strSQL) <<< Linie 10
Mvh
thomas
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials
| |
Jens Gyldenkærne Cla~ (17-07-2004)
| Kommentar
Fra : Jens Gyldenkærne Cla~ |
Dato : 17-07-04 22:10 |
|
thagemann89 skrev:
> Tusinde tak for alt hjælp indtil nu, men siden vil stadig ikke
> virke...
O.k. Hvis du vil have mere hjælp herfra vil jeg foreslå dig at læse
min signatur.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html
| |
|
|