4 svar · 178 visningar · startad av iqbadboll
Ta en titt på följande:
<html><head><title>Namnsdag</title></head>
<body link="000000" alink="000000" vlink="000000">
<!-- #include virtual="\mes\adovbs.inc" -->
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=C:\Inetpub\wwwroot\db\namn.mdb"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM namn WHERE datum = '07-21'"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
%>
<% Do Until RecSet.EOF %>
<font face="Verdana" size="1">
<% =RecSet("namn")%>
</font>
<% RecSet.MoveNext
Loop %>
<% RecSet.Close %>
<% Connect.Close %>
</html>
Där det står datum = 07-21 vil jag att den automatiskt ska hämta dagens månad och dagens datum... har prövat att skriva =dat och innan har jag du då anget att dat=månade-dag...
Någon som vet hur man gör??
Hello,
<% =MonthName(Month(#07-21#))%> ger juli
<% =WeekDayName(WeekDay(#07-21#,2))%> ger torsdag
<% =Day(#07-21#)%> ger 21
Hoppas att det var det du frågade efter ...
PatrikB
------------------
=================================
** ZWGdesign **
=================================
[Redigerat av PatrikB den 21 jul 2000]
inte riktigt...
det går ju inte att skiva i SQL-satsen... jag vill att där det står 07-21 ska den automatiskt känna av viket dagens datum är så om det är 07-22 ska den skriva det...
men jag vet inte vad jag ska skriva när det är SQL...
Fungerarde inte riktigt... då skrev den ju t ex 2000-07-22
Men jag löste det själv...
<%
dat=right("0"&month(now),2)&"-"&right("0"&day(now),2)
%>
Och sedan
Addera = "SELECT * FROM namn WHERE datum = '" & dat & "'"
MVH
Calle