Avatar billede webnord Novice
12. september 2003 - 21:23 Der er 25 kommentarer og
1 løsning

Hente en bestemt post

Hejsa

Jeg har lavet en tabel kaldet lektion som indeholder 3 kolonner

ID  Starttid    Sluttid
1    08.00      08.45
2    08.55      09.40
3    09.50      10.35
4    10.45      11.35

Nu vil jeg gerne slå op i posten 08.00 dette gør jeg med
<%=rs("starttid")%> se - den virker ok og giver mig 08.00

Men hvordan slår jeg op i posten 09.50 ??

Jeg ved godt jeg kan køre en løkke, men det dur ikke i dette tilfælde.

Hjæælp
Falcon
Avatar billede eagleeye Praktikant
12. september 2003 - 21:27 #1
Du kan enten hendte det via SQL'en du kun tager 09.50 ud :
SQL = "SELECT * FROM tabel WHERE starttid = '09.50'"


Eller du kan bruge .find på et recordset hvis du åbner det emd rs.Open

rs.Open "SELECT * FROM tabel", Conn, 1, 3

rs.Find "Starttid = '09.50'"
Avatar billede webnord Novice
12. september 2003 - 21:47 #2
Prøver flg:

SQLstmt = "SELECT * FROM lektioner rs.Find Starttid  =  & Request("starttid")"

men får fejlen
SQLstmt = "SELECT * FROM lektioner rs.Find Starttid  =  & Request("starttid")"
-------------------------------------------------------------------^
Avatar billede eagleeye Praktikant
12. september 2003 - 21:51 #3
Så skal det laves sådan her:

SQLstmt = "SELECT * FROM lektioner rs.Find Starttid  = '" & Request("starttid") & "'"


Hvilken type er Starttid i databasen??
Avatar billede webnord Novice
12. september 2003 - 21:53 #4
text
Avatar billede eagleeye Praktikant
12. september 2003 - 21:53 #5
Ok så prøv som vist i sidste kommentar med ' omkring.
Avatar billede webnord Novice
12. september 2003 - 21:58 #6
prøver flg:
SQLstmt = "SELECT * FROM lektioner rs.Find Starttid  = '" & Request("starttid") & "'"

men får fejlen:

SELECT * FROM lektioner rs.Find Starttid = '09.50'
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in FROM clause.
Avatar billede eagleeye Praktikant
12. september 2003 - 21:59 #7
doh jeg fik blandet de to løsninger sådan her :

SQLstmt = "SELECT * FROM lektioner WHERE Starttid  = '" & Request("starttid") & "'"
Avatar billede webnord Novice
12. september 2003 - 22:09 #8
giver flg:

SELECT * FROM lektioner WHERE Starttid = '09.50'
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
Avatar billede webnord Novice
12. september 2003 - 22:11 #9
husk det er et tekst ikke et tal
Avatar billede eagleeye Praktikant
12. september 2003 - 22:11 #10
Så prøv at tjekke kolonnenavnet er rigtigt.
Avatar billede eagleeye Praktikant
12. september 2003 - 22:15 #11
Fejlen kommer typsik hvis et kolonnen er skrevet forkert.

Til at state med kan du skriver SQL sætningen sådan her så du præsis ved hvad du hendter.:

SQLstmt = "SELECT * FROM lektioner WHERE Starttid = '09.50'"
Avatar billede webnord Novice
12. september 2003 - 22:25 #12
Havde egentlig tænkt at gøre noget a' la:

<%=rs("starttid") where id=1%>
Avatar billede webnord Novice
12. september 2003 - 22:25 #13
<%=rs("starttid") where id=3%>
Avatar billede eagleeye Praktikant
12. september 2003 - 22:28 #14
Ok, så skal du bruge den anden løsning jeg viste for du kan ikke skrive det sådan der direkte..

Så skal du skrive det sådan her:
<%
rs.Find "id=3"
%>
<%=rs("starttid")%>
Avatar billede webnord Novice
12. september 2003 - 22:37 #15
prøvede:
<%rs.Find "id=1"%><%=rs("starttid")%>
men fik flg:

Microsoft OLE DB Provider for ODBC Drivers error '80040e29'

Rowset does not support scrolling backward.
Avatar billede webnord Novice
12. september 2003 - 22:37 #16
prøvede:
<%rs.Find "id=3"%><%=rs("starttid")%>
men fik flg:

Microsoft OLE DB Provider for ODBC Drivers error '80040e29'

Rowset does not support scrolling backward.
Avatar billede eagleeye Praktikant
12. september 2003 - 22:38 #17
Der hvor du åbner dit recordset hvordan ser det ud?
Det er en linje som starter med:

Set rs =
Avatar billede webnord Novice
12. september 2003 - 22:39 #18
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/Database/skole.mdb")

SQLstmt = "SELECT * FROM lektion "
Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)
Avatar billede eagleeye Praktikant
12. september 2003 - 22:41 #19
Når man bruger find skal man bruge rs.Open så prøv at rette det kode du har vist til dette:


Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.MapPath("/Database/skole.mdb")

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

SQLstmt = "SELECT * FROM lektion "

rs.Open = SQLstmt, conn, 1, 3
Avatar billede webnord Novice
12. september 2003 - 22:43 #20
ok men giver flg:

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/skole/default.asp, line 44

rs.Open = SQLstmt, conn, 1, 3
-----------------^
Avatar billede eagleeye Praktikant
12. september 2003 - 22:44 #21
Sådan her ;)

rs.Open SQLstmt, conn, 1, 3
Avatar billede webnord Novice
12. september 2003 - 22:47 #22
Super - det virker Jubiii
Avatar billede webnord Novice
12. september 2003 - 22:48 #23
men hvordan får du pointene ??
Avatar billede eagleeye Praktikant
12. september 2003 - 22:48 #24
Jeg svare lige ;)
Avatar billede eagleeye Praktikant
12. september 2003 - 22:49 #25
Så skulle du gerne kunne acceptere mit svar og dermed give points. ;)
Avatar billede webnord Novice
12. september 2003 - 22:50 #26
ok er hermed gjort
Takker mange gange
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

Seneste spørgsmål Seneste aktivitet
I går 21:00 Libre Office Impress Af Frank i Andre styresystemer
I går 11:47 VB script Af Jenshentze i Word
I går 11:21 Popup ved opstart Af mort1 i Windows
04/0918:50 Slet lokal konto Af ErikHg i Windows
04/0916:05 Ændre tal i en celle Af xvid i Excel