Avatar billede eaz Nybegynder
18. marts 2002 - 12:55 Der er 12 kommentarer og
2 løsninger

Checke Ja/Nej Checkbox i Access

Jeg har en accessdatabase hvor en af mine kolonner (Admin) er af formen Ja/Nej og ikke af formen tekst.

Jeg ønsker at checke om feltet Admin er krydset af og hvis det er så bare lave en response.write("Virker!")

Min connection string ser sådan ud (der er ingen problemer med den, den virker fint):
strSQL = "SELECT Adresseliste.Kode, Adresseliste.Admin FROM Adresseliste WHERE Adresseliste.BrugerID ='" & strBrugerID & "'"

Og jeg ønsker noget i retning af dette (som ikke virker):
If rs("Admin") = True then
ResponseWrite("Hey True virker!")
end if

Det er If linjen jeg er i tvivl om.

På forhånd tak.
Avatar billede stig3 Mester
18. marts 2002 - 12:58 #1
prøv med:
ResponseWrite(rs("Admin"))
Avatar billede eaz Nybegynder
18. marts 2002 - 13:02 #2
Jeg får error '80020009'
Exception occurred.

hvis jeg indsætter ovenstående :(

Og det jeg gerne vil vide er hvordan jeg checker en yes/no checkboks.
Avatar billede rou Nybegynder
18. marts 2002 - 13:03 #3
Du kan måske checke imod 0/1 kontra false/true, istedet.

<%
If(rs("Admin") = 1) then
  ResponseWrite("Hey True virker!")
end if
%>
Avatar billede eaz Nybegynder
18. marts 2002 - 13:06 #4
Så får igen:
'80020009'
Exception occurred.

:(
Avatar billede stig3 Mester
18. marts 2002 - 13:15 #5
hvad med:

ResponseWrite(CStr(rs("Admin")))
Avatar billede eaz Nybegynder
18. marts 2002 - 13:20 #6
har lavet en testyesno.asp
med flg indhold:

Dim adoCon
Dim strCon
Dim rs

'Lad os prøve at åbne en forbindelse til databasen
Set adoCon = Server.CreateObject("ADODB.Connection")
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\usr\www\nordicwe\httpd\htdocs\nereus\access\nereus_database.mdb;"
adoCon.Open strCon

Set rs = Server.CreateObject("ADODB.Recordset")

'Hvad vil vi spørge databasen om
'strSQL = "SELECT Kode FROM Adresseliste WHERE BrugerID ='" & strBrugerID & "'" 'linje 30
strSQL = "SELECT Adresseliste.Kode, Adresseliste.Admin FROM Adresseliste WHERE Adresseliste.BrugerID ='" & strBrugerID & "'"

'Spørg
rs.Open strSQL, strCon

ResponseWrite(CStr(rs("Admin")))

Set adoCon = Nothing
Set strCon = Nothing
Set rs = Nothing

Og det virker ikke! Får den der grumme fejl :(
Avatar billede stig3 Mester
18. marts 2002 - 13:32 #7
er dit brugerID et tekstfelt ??

ellers..
strSQL = "SELECT Kode, Admin FROM Adresseliste WHERE Adresseliste.BrugerID =" & strBrugerID
Avatar billede stig3 Mester
18. marts 2002 - 13:33 #8
hovsa og....

Source="d:\usr\www\nordicwe\httpd\htdocs\nereus\access\nereus_database.mdb;"

du mangler et "
Avatar billede eaz Nybegynder
18. marts 2002 - 13:52 #9
stig3 tro mig der er ikke fejl i connection stringen.

Tilgængæld fandt jeg selv ud af at flg virker:
If rs.Fields.Item("Admin").Value = "True"

Så ved i det til en anden gang.

Selvom i ikke lige fandt svaret, så falder der alligevel lige lidt point af til dem der svarede, så hvis stig3 gad lave et svar istedet for en kommentar tjener han også et par point.
Avatar billede tsunami Nybegynder
18. marts 2002 - 14:59 #10
Det skulle da ikke undre mig at du også skulle kunne gøre dette.... der er nemlig en lille forskel med at få de rigtige navne ud af en Dansk Access database engang imellem.... kun et forslag

If rs("Admin") = Sand then
ResponseWrite("Hey True virker!")
end if
Avatar billede webben Nybegynder
18. marts 2002 - 15:27 #11
if rs("admin") = "true" then
response.write("Hey True virker")
end if
Avatar billede eaz Nybegynder
18. marts 2002 - 16:37 #12
If rs("Admin") = Sand er ikke korrekt syntaks, der er ingen forskel på dansk/engelsk accessdatabaser (i hvertfald på dette punkt).

Som syntaks kan bruges:
if rs("admin") = "true"
eller
If rs.Fields.Item("Admin").Value = "True"

Jeg fordeler point nu.
Avatar billede tsunami Nybegynder
18. marts 2002 - 17:08 #13
Har da haft problemer som løste det ved at skrive Sand
Avatar billede tsunami Nybegynder
18. marts 2002 - 17:08 #14
But anyway... du fandt en løsning så det er også ligemeget
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