Avatar billede hinkesten Praktikant
16. marts 2012 - 19:02 Der er 6 kommentarer og
1 løsning

ASP: Weekday problem

Hej eksperter

Jeg er stødt ind i et problem med min ASP kode. Jeg ønsker at min kode skal udskrive åbningstiden på den pågældende ugedag, som følge af et tjek med en Access database, men jeg får flg. fejl:

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

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/cf/default.asp, line 41

Linie 41 er: Set rs = Conn.Execute(strSQL)

<%
Ugedag = (Weekday(Date,1))
if Ugedag = "1" then
UgedagDK = "Søndag"
elseif Ugedag = "2" then
UgedagDK = "Mandag"
elseif Ugedag = "3" then
UgedagDK = "Tirsdag"
elseif Ugedag = "4" then
UgedagDK = "Onsdag"
elseif Ugedag = "5" then
UgedagDK = "Torsdag"
elseif Ugedag = "6" then
UgedagDK = "Fredag"
elseif Ugedag = "7" then
UgedagDK = "Lørdag"
end if
response.write UgedagDK

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

strSQL = "Select * From aabningstider Where dag = " & UgedagDK
Set rs = Conn.Execute(strSQL)

Response.write rs("start")

Conn.Close
Set Conn = Nothing
%>
Avatar billede arne_v Ekspert
16. marts 2012 - 19:10 #1
Hvad udskriver

response.write UgedagDK

?
Avatar billede hinkesten Praktikant
16. marts 2012 - 19:22 #2
Den skriver Mandag, Tirsdag, osv.
Avatar billede arne_v Ekspert
16. marts 2012 - 19:31 #3
strSQL = "Select * From aabningstider Where dag = " & UgedagDK

->

strSQL = "Select * From aabningstider Where dag = '" & UgedagDK & "'"

maaske
Avatar billede claes57 Ekspert
16. marts 2012 - 19:38 #4
du skal lige finde ud af, om du er i Danmark.
Ugedag = (Weekday(Date,1))
,1 = første ugedag = søndag, og i Danmark bruger vi mandag.
http://www.w3schools.com/vbScript/func_weekday.asp

og hvis nu dine data fejler (ikke er 1-7), hvad så
du bør slutte med
else
UgedagDK = "Lørdag"
end if

og dagen skal i pinger, da det er en tekst:
strSQL = "Select * From aabningstider Where dag = '" & UgedagDK & "'"
Avatar billede claes57 Ekspert
16. marts 2012 - 19:40 #5
#3 jeg sidder lige og kloger mig, så du bør ikke ligge svar 7 minutter før mig.... ;)
Avatar billede hinkesten Praktikant
16. marts 2012 - 19:48 #6
#3 Tak for det. Det virker!
Avatar billede arne_v Ekspert
16. marts 2012 - 19:51 #7
saa smider jeg et svar
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