18. marts 2002 - 12:55Der 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
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
'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
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.
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
But anyway... du fandt en løsning så det er også ligemeget
Synes godt om
Ny brugerNybegynder
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.