Connecting Tech Pros Worldwide Help | Site Map

Create A List Of Dates In A Month

PC Datasheet
Guest
 
Posts: n/a
#1: Jan 8 '06
An Access user saw my name in a newsgroup and sent me a request for help on
a project. As part of the project, a list of the dates in a month was
needed. For anyone needing a list of dates in a month, here is what I used:

1. Create a table named TblNumbers with one field named Num and populate
the table with 1 to 31
2. Create a query based on TblNumbers
3. Pull down Num into the first field of the query.
4. Put the following expression in the criteria for Num:
<=Day(DateSerial(6,1+1,0))
5. Put the following expression in the second field of the query:
MonthDate: DateSerial(6,1,[Num])
6. Put the following expression in the third field of the query:
=Day([MonthDate])
7. Put the following expression in the fourth field of the query:
=Format([MonthDate],"ddd")
8. Put the following expression in the fifth field of the query:
= Format([MonthDate],"dddd")
9. Run the query.

The query will return all the dates for this month (January 06) in the
second column. The third column will contain the day of the month for each
date. The fourth column will contain the three letter abbreviation for the
day of the week for each date. The fifth column will contain the full name
of the day of the week for each date.

In the DateSerial expression, 6 is the year (06) and 1 is the number of the
month. You can make the query return the dates for any year and month by
modifying the DateSerial function to make the 6 and 1 selectable on a form.


--
PC Datasheet
Your Resource For Help With Access, Excel And Word Applications
Over 1075 users have come to me from the newsgroups requesting help
resource@pcdatasheet.com


Rob Oldfield
Guest
 
Posts: n/a
#2: Jan 8 '06

re: Create A List Of Dates In A Month



To quote Arno:

Most people here have a common belief that the newsgroups are for *free
exchange of information*.
But Steve is a notorious job hunter in these groups, always trying to sell
his services.

Before you intend to do business with him look at:
http://home.tiscali.nl/arracom/whoissteve.html



"PC Datasheet" <nospam@nospam.spam> wrote in message
news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=blue]
> An Access user saw my name in a newsgroup and sent me a request for help[/color]
on[color=blue]
> a project. As part of the project, a list of the dates in a month was
> needed. For anyone needing a list of dates in a month, here is what I[/color]
used:[color=blue]
>
> 1. Create a table named TblNumbers with one field named Num and populate
> the table with 1 to 31
> 2. Create a query based on TblNumbers
> 3. Pull down Num into the first field of the query.
> 4. Put the following expression in the criteria for Num:
> <=Day(DateSerial(6,1+1,0))
> 5. Put the following expression in the second field of the query:
> MonthDate: DateSerial(6,1,[Num])
> 6. Put the following expression in the third field of the query:
> =Day([MonthDate])
> 7. Put the following expression in the fourth field of the query:
> =Format([MonthDate],"ddd")
> 8. Put the following expression in the fifth field of the query:
> = Format([MonthDate],"dddd")
> 9. Run the query.
>
> The query will return all the dates for this month (January 06) in the
> second column. The third column will contain the day of the month for each
> date. The fourth column will contain the three letter abbreviation for the
> day of the week for each date. The fifth column will contain the full[/color]
name[color=blue]
> of the day of the week for each date.
>
> In the DateSerial expression, 6 is the year (06) and 1 is the number of[/color]
the[color=blue]
> month. You can make the query return the dates for any year and month by
> modifying the DateSerial function to make the 6 and 1 selectable on a[/color]
form.[color=blue]
>
>
> --
> PC Datasheet
> Your Resource For Help With Access, Excel And Word Applications
> Over 1075 users have come to me from the newsgroups requesting[/color]
help[color=blue]
> resource@pcdatasheet.com
>
>[/color]


Duane Hookom
Guest
 
Posts: n/a
#3: Jan 8 '06

re: Create A List Of Dates In A Month


I'm not sure why you didn't just put this tip in the Access/Excel Tips page
on your web site (which is blank/under construction)? That's what I believe
most would have done rather than stating that someone asked you a question
off line. I'm not suggesting you didn't get a legitimate question off line
but it is just a bit unusual to post like you did in all these news groups.

I believe there are other forums on the web that are more accepting of
Access tips (and advertising ;-).

--
Duane Hookom
MS Access MVP
--

"PC Datasheet" <nospam@nospam.spam> wrote in message
news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=blue]
> An Access user saw my name in a newsgroup and sent me a request for help
> on a project. As part of the project, a list of the dates in a month was
> needed. For anyone needing a list of dates in a month, here is what I
> used:
>
> 1. Create a table named TblNumbers with one field named Num and populate
> the table with 1 to 31
> 2. Create a query based on TblNumbers
> 3. Pull down Num into the first field of the query.
> 4. Put the following expression in the criteria for Num:
> <=Day(DateSerial(6,1+1,0))
> 5. Put the following expression in the second field of the query:
> MonthDate: DateSerial(6,1,[Num])
> 6. Put the following expression in the third field of the query:
> =Day([MonthDate])
> 7. Put the following expression in the fourth field of the query:
> =Format([MonthDate],"ddd")
> 8. Put the following expression in the fifth field of the query:
> = Format([MonthDate],"dddd")
> 9. Run the query.
>
> The query will return all the dates for this month (January 06) in the
> second column. The third column will contain the day of the month for each
> date. The fourth column will contain the three letter abbreviation for the
> day of the week for each date. The fifth column will contain the full
> name of the day of the week for each date.
>
> In the DateSerial expression, 6 is the year (06) and 1 is the number of
> the month. You can make the query return the dates for any year and month
> by modifying the DateSerial function to make the 6 and 1 selectable on a
> form.
>
>
> --
> PC Datasheet
> Your Resource For Help With Access, Excel And Word Applications
> Over 1075 users have come to me from the newsgroups requesting help
> resource@pcdatasheet.com
>[/color]


Rob Oldfield
Guest
 
Posts: n/a
#4: Jan 9 '06

re: Create A List Of Dates In A Month


Just in case anyone was also wondering, I had a big money client today who
paid me a small Caribbean island for coming up with this:

function MultByTwo(d as double)
MultByTwo=d*2
end function

I'm particularly proud of that. That's the 57,365th person who's contacted
me because they've seen my name on a newsgroup this month.


"Duane Hookom" <duanehookom@NoSpamHotmail.com> wrote in message
news:eZnavNIFGHA.1736@TK2MSFTNGP14.phx.gbl...[color=blue]
> I'm not sure why you didn't just put this tip in the Access/Excel Tips[/color]
page[color=blue]
> on your web site (which is blank/under construction)? That's what I[/color]
believe[color=blue]
> most would have done rather than stating that someone asked you a question
> off line. I'm not suggesting you didn't get a legitimate question off line
> but it is just a bit unusual to post like you did in all these news[/color]
groups.[color=blue]
>
> I believe there are other forums on the web that are more accepting of
> Access tips (and advertising ;-).
>
> --
> Duane Hookom
> MS Access MVP
> --
>
> "PC Datasheet" <nospam@nospam.spam> wrote in message
> news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=green]
> > An Access user saw my name in a newsgroup and sent me a request for help
> > on a project. As part of the project, a list of the dates in a month was
> > needed. For anyone needing a list of dates in a month, here is what I
> > used:
> >
> > 1. Create a table named TblNumbers with one field named Num and[/color][/color]
populate[color=blue][color=green]
> > the table with 1 to 31
> > 2. Create a query based on TblNumbers
> > 3. Pull down Num into the first field of the query.
> > 4. Put the following expression in the criteria for Num:
> > <=Day(DateSerial(6,1+1,0))
> > 5. Put the following expression in the second field of the query:
> > MonthDate: DateSerial(6,1,[Num])
> > 6. Put the following expression in the third field of the query:
> > =Day([MonthDate])
> > 7. Put the following expression in the fourth field of the query:
> > =Format([MonthDate],"ddd")
> > 8. Put the following expression in the fifth field of the query:
> > = Format([MonthDate],"dddd")
> > 9. Run the query.
> >
> > The query will return all the dates for this month (January 06) in the
> > second column. The third column will contain the day of the month for[/color][/color]
each[color=blue][color=green]
> > date. The fourth column will contain the three letter abbreviation for[/color][/color]
the[color=blue][color=green]
> > day of the week for each date. The fifth column will contain the full
> > name of the day of the week for each date.
> >
> > In the DateSerial expression, 6 is the year (06) and 1 is the number of
> > the month. You can make the query return the dates for any year and[/color][/color]
month[color=blue][color=green]
> > by modifying the DateSerial function to make the 6 and 1 selectable on a
> > form.
> >
> >
> > --
> > PC Datasheet
> > Your Resource For Help With Access, Excel And Word[/color][/color]
Applications[color=blue][color=green]
> > Over 1075 users have come to me from the newsgroups requesting[/color][/color]
help[color=blue][color=green]
> > resource@pcdatasheet.com
> >[/color]
>
>[/color]


Duane Hookom
Guest
 
Posts: n/a
#5: Jan 9 '06

re: Create A List Of Dates In A Month


We had our company holiday party last night. We paid good money for a
comedian. He could have taken a lesson or two from you....

Keep it coming ;-)

BTW: consider data typing your function
Function MultByTwo(d as Double) as Double

--
Duane Hookom
MS Access MVP
--

"Rob Oldfield" <blah@blah.com> wrote in message
news:43c1bc19$0$901$db0fefd9@news.zen.co.uk...[color=blue]
> Just in case anyone was also wondering, I had a big money client today who
> paid me a small Caribbean island for coming up with this:
>
> function MultByTwo(d as double)
> MultByTwo=d*2
> end function
>
> I'm particularly proud of that. That's the 57,365th person who's
> contacted
> me because they've seen my name on a newsgroup this month.
>
>
> "Duane Hookom" <duanehookom@NoSpamHotmail.com> wrote in message
> news:eZnavNIFGHA.1736@TK2MSFTNGP14.phx.gbl...[color=green]
>> I'm not sure why you didn't just put this tip in the Access/Excel Tips[/color]
> page[color=green]
>> on your web site (which is blank/under construction)? That's what I[/color]
> believe[color=green]
>> most would have done rather than stating that someone asked you a
>> question
>> off line. I'm not suggesting you didn't get a legitimate question off
>> line
>> but it is just a bit unusual to post like you did in all these news[/color]
> groups.[color=green]
>>
>> I believe there are other forums on the web that are more accepting of
>> Access tips (and advertising ;-).
>>
>> --
>> Duane Hookom
>> MS Access MVP
>> --
>>
>> "PC Datasheet" <nospam@nospam.spam> wrote in message
>> news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=darkred]
>> > An Access user saw my name in a newsgroup and sent me a request for
>> > help
>> > on a project. As part of the project, a list of the dates in a month
>> > was
>> > needed. For anyone needing a list of dates in a month, here is what I
>> > used:
>> >
>> > 1. Create a table named TblNumbers with one field named Num and[/color][/color]
> populate[color=green][color=darkred]
>> > the table with 1 to 31
>> > 2. Create a query based on TblNumbers
>> > 3. Pull down Num into the first field of the query.
>> > 4. Put the following expression in the criteria for Num:
>> > <=Day(DateSerial(6,1+1,0))
>> > 5. Put the following expression in the second field of the query:
>> > MonthDate: DateSerial(6,1,[Num])
>> > 6. Put the following expression in the third field of the query:
>> > =Day([MonthDate])
>> > 7. Put the following expression in the fourth field of the query:
>> > =Format([MonthDate],"ddd")
>> > 8. Put the following expression in the fifth field of the query:
>> > = Format([MonthDate],"dddd")
>> > 9. Run the query.
>> >
>> > The query will return all the dates for this month (January 06) in the
>> > second column. The third column will contain the day of the month for[/color][/color]
> each[color=green][color=darkred]
>> > date. The fourth column will contain the three letter abbreviation for[/color][/color]
> the[color=green][color=darkred]
>> > day of the week for each date. The fifth column will contain the full
>> > name of the day of the week for each date.
>> >
>> > In the DateSerial expression, 6 is the year (06) and 1 is the number of
>> > the month. You can make the query return the dates for any year and[/color][/color]
> month[color=green][color=darkred]
>> > by modifying the DateSerial function to make the 6 and 1 selectable on
>> > a
>> > form.
>> >
>> >
>> > --
>> > PC Datasheet
>> > Your Resource For Help With Access, Excel And Word[/color][/color]
> Applications[color=green][color=darkred]
>> > Over 1075 users have come to me from the newsgroups requesting[/color][/color]
> help[color=green][color=darkred]
>> > resource@pcdatasheet.com
>> >[/color]
>>
>>[/color]
>
>[/color]


Steve Schapel
Guest
 
Posts: n/a
#6: Jan 9 '06

re: Create A List Of Dates In A Month


ROFL!! Very nice, Rob.

--
Steve Schapel, Microsoft Access MVP


Rob Oldfield wrote:[color=blue]
> Just in case anyone was also wondering, I had a big money client today who
> paid me a small Caribbean island for coming up with this:
>
> function MultByTwo(d as double)
> MultByTwo=d*2
> end function
>
> I'm particularly proud of that. That's the 57,365th person who's contacted
> me because they've seen my name on a newsgroup this month.[/color]
rkc
Guest
 
Posts: n/a
#7: Jan 9 '06

re: Create A List Of Dates In A Month


PC Datasheet wrote:[color=blue]
> An Access user saw my name in a newsgroup and sent me a request for help on
> a project.[/color]

I need to find a picture of a smiley face.
Can you help me with that?
Marshall Barton
Guest
 
Posts: n/a
#8: Jan 9 '06

re: Create A List Of Dates In A Month


Duane Hookom wrote:
[color=blue]
>We had our company holiday party last night. We paid good money for a
>comedian. He could have taken a lesson or two from you....
>
>Keep it coming ;-)
>
>BTW: consider data typing your function
>Function MultByTwo(d as Double) as Double[/color]


Hey, it was only a small island. For full typing, you have
to throw in a yacht.

--
Marsh
MVP [MS Access]
Keith Wilby
Guest
 
Posts: n/a
#9: Jan 9 '06

re: Create A List Of Dates In A Month


"Rob Oldfield" <blah@blah.com> wrote in message
news:43c1bc19$0$901$db0fefd9@news.zen.co.uk...[color=blue]
>
> I'm particularly proud of that. That's the 57,365th person who's
> contacted
> me because they've seen my name on a newsgroup this month.
>
>[/color]
<Four Yorkshiremen>
An yuh tell that tuh yung peepul tuday ... an thi don't believe yuh!
</Four Yorkshiremen>


Keith Wilby
Guest
 
Posts: n/a
#10: Jan 9 '06

re: Create A List Of Dates In A Month


"PC Datasheet" <nospam@nospam.spam> wrote in message
news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=blue]
> For anyone needing a list of dates in a month, here is what I used:
>[/color]
A large crayon?

How much did your solution cost?


Rob Oldfield
Guest
 
Posts: n/a
#11: Jan 9 '06

re: Create A List Of Dates In A Month


Incidentally Steve, I was just browsing Arno's site when I noticed a mail
from you to a previous prospective client including the phrase: "You will
totally own the application; there will be no licensing restrictions."

Did you change your standard terms, or did you ask the owner of this code
for permission to reproduce it here?


"PC Datasheet" <nospam@nospam.spam> wrote in message
news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=blue]
> An Access user saw my name in a newsgroup and sent me a request for help[/color]
on[color=blue]
> a project. As part of the project, a list of the dates in a month was
> needed. For anyone needing a list of dates in a month, here is what I[/color]
used:[color=blue]
>
> 1. Create a table named TblNumbers with one field named Num and populate
> the table with 1 to 31
> 2. Create a query based on TblNumbers
> 3. Pull down Num into the first field of the query.
> 4. Put the following expression in the criteria for Num:
> <=Day(DateSerial(6,1+1,0))
> 5. Put the following expression in the second field of the query:
> MonthDate: DateSerial(6,1,[Num])
> 6. Put the following expression in the third field of the query:
> =Day([MonthDate])
> 7. Put the following expression in the fourth field of the query:
> =Format([MonthDate],"ddd")
> 8. Put the following expression in the fifth field of the query:
> = Format([MonthDate],"dddd")
> 9. Run the query.
>
> The query will return all the dates for this month (January 06) in the
> second column. The third column will contain the day of the month for each
> date. The fourth column will contain the three letter abbreviation for the
> day of the week for each date. The fifth column will contain the full[/color]
name[color=blue]
> of the day of the week for each date.
>
> In the DateSerial expression, 6 is the year (06) and 1 is the number of[/color]
the[color=blue]
> month. You can make the query return the dates for any year and month by
> modifying the DateSerial function to make the 6 and 1 selectable on a[/color]
form.[color=blue]
>
>
> --
> PC Datasheet
> Your Resource For Help With Access, Excel And Word Applications
> Over 1075 users have come to me from the newsgroups requesting[/color]
help[color=blue]
> resource@pcdatasheet.com
>
>[/color]


Rob Oldfield
Guest
 
Posts: n/a
#12: Jan 10 '06

re: Create A List Of Dates In A Month


Arno,

You think it would be a good idea to include another section on your site:
how to report abuse to Earthlink? I'm perfectly prepared to help out by
writing it.


"Rob Oldfield" <blah@blah.com> wrote in message
news:43c2dac2$0$23285$db0fefd9@news.zen.co.uk...[color=blue]
> Incidentally Steve, I was just browsing Arno's site when I noticed a mail
> from you to a previous prospective client including the phrase: "You will
> totally own the application; there will be no licensing restrictions."
>
> Did you change your standard terms, or did you ask the owner of this code
> for permission to reproduce it here?
>
>
> "PC Datasheet" <nospam@nospam.spam> wrote in message
> news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=green]
> > An Access user saw my name in a newsgroup and sent me a request for help[/color]
> on[color=green]
> > a project. As part of the project, a list of the dates in a month was
> > needed. For anyone needing a list of dates in a month, here is what I[/color]
> used:[color=green]
> >
> > 1. Create a table named TblNumbers with one field named Num and[/color][/color]
populate[color=blue][color=green]
> > the table with 1 to 31
> > 2. Create a query based on TblNumbers
> > 3. Pull down Num into the first field of the query.
> > 4. Put the following expression in the criteria for Num:
> > <=Day(DateSerial(6,1+1,0))
> > 5. Put the following expression in the second field of the query:
> > MonthDate: DateSerial(6,1,[Num])
> > 6. Put the following expression in the third field of the query:
> > =Day([MonthDate])
> > 7. Put the following expression in the fourth field of the query:
> > =Format([MonthDate],"ddd")
> > 8. Put the following expression in the fifth field of the query:
> > = Format([MonthDate],"dddd")
> > 9. Run the query.
> >
> > The query will return all the dates for this month (January 06) in the
> > second column. The third column will contain the day of the month for[/color][/color]
each[color=blue][color=green]
> > date. The fourth column will contain the three letter abbreviation for[/color][/color]
the[color=blue][color=green]
> > day of the week for each date. The fifth column will contain the full[/color]
> name[color=green]
> > of the day of the week for each date.
> >
> > In the DateSerial expression, 6 is the year (06) and 1 is the number of[/color]
> the[color=green]
> > month. You can make the query return the dates for any year and month by
> > modifying the DateSerial function to make the 6 and 1 selectable on a[/color]
> form.[color=green]
> >
> >
> > --
> > PC Datasheet
> > Your Resource For Help With Access, Excel And Word[/color][/color]
Applications[color=blue][color=green]
> > Over 1075 users have come to me from the newsgroups requesting[/color]
> help[color=green]
> > resource@pcdatasheet.com
> >
> >[/color]
>
>[/color]


Douglas J. Steele
Guest
 
Posts: n/a
#13: Jan 10 '06

re: Create A List Of Dates In A Month


I wonder whether
http://news.com.com/Create+an+e-anno...2491&subj=news
is relevant here...

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no private e-mails, please)


"Rob Oldfield" <blah@blah.com> wrote in message
news:43c2fd42$0$23285$db0fefd9@news.zen.co.uk...[color=blue]
> Arno,
>
> You think it would be a good idea to include another section on your site:
> how to report abuse to Earthlink? I'm perfectly prepared to help out by
> writing it.
>
>
> "Rob Oldfield" <blah@blah.com> wrote in message
> news:43c2dac2$0$23285$db0fefd9@news.zen.co.uk...[color=green]
>> Incidentally Steve, I was just browsing Arno's site when I noticed a mail
>> from you to a previous prospective client including the phrase: "You will
>> totally own the application; there will be no licensing restrictions."
>>
>> Did you change your standard terms, or did you ask the owner of this code
>> for permission to reproduce it here?
>>
>>
>> "PC Datasheet" <nospam@nospam.spam> wrote in message
>> news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...[color=darkred]
>> > An Access user saw my name in a newsgroup and sent me a request for
>> > help[/color]
>> on[color=darkred]
>> > a project. As part of the project, a list of the dates in a month was
>> > needed. For anyone needing a list of dates in a month, here is what I[/color]
>> used:[color=darkred]
>> >
>> > 1. Create a table named TblNumbers with one field named Num and[/color][/color]
> populate[color=green][color=darkred]
>> > the table with 1 to 31
>> > 2. Create a query based on TblNumbers
>> > 3. Pull down Num into the first field of the query.
>> > 4. Put the following expression in the criteria for Num:
>> > <=Day(DateSerial(6,1+1,0))
>> > 5. Put the following expression in the second field of the query:
>> > MonthDate: DateSerial(6,1,[Num])
>> > 6. Put the following expression in the third field of the query:
>> > =Day([MonthDate])
>> > 7. Put the following expression in the fourth field of the query:
>> > =Format([MonthDate],"ddd")
>> > 8. Put the following expression in the fifth field of the query:
>> > = Format([MonthDate],"dddd")
>> > 9. Run the query.
>> >
>> > The query will return all the dates for this month (January 06) in the
>> > second column. The third column will contain the day of the month for[/color][/color]
> each[color=green][color=darkred]
>> > date. The fourth column will contain the three letter abbreviation for[/color][/color]
> the[color=green][color=darkred]
>> > day of the week for each date. The fifth column will contain the full[/color]
>> name[color=darkred]
>> > of the day of the week for each date.
>> >
>> > In the DateSerial expression, 6 is the year (06) and 1 is the number of[/color]
>> the[color=darkred]
>> > month. You can make the query return the dates for any year and month
>> > by
>> > modifying the DateSerial function to make the 6 and 1 selectable on a[/color]
>> form.[color=darkred]
>> >
>> >
>> > --
>> > PC Datasheet
>> > Your Resource For Help With Access, Excel And Word[/color][/color]
> Applications[color=green][color=darkred]
>> > Over 1075 users have come to me from the newsgroups requesting[/color]
>> help[color=darkred]
>> > resource@pcdatasheet.com
>> >
>> >[/color]
>>
>>[/color]
>
>[/color]


Rob Oldfield
Guest
 
Posts: n/a
#14: Jan 10 '06

re: Create A List Of Dates In A Month


Well that's just annoying.


"Douglas J. Steele" <NOSPAM_djsteele@NOSPAM_canada.com> wrote in message
news:eVeDl9XFGHA.524@TK2MSFTNGP09.phx.gbl...[color=blue]
> I wonder whether
>[/color]
http://news.com.com/Create+an+e-anno...2491&subj=news[color=blue]
> is relevant here...
>
> --
> Doug Steele, Microsoft Access MVP
> http://I.Am/DougSteele
> (no private e-mails, please)
>
>
> "Rob Oldfield" <blah@blah.com> wrote in message
> news:43c2fd42$0$23285$db0fefd9@news.zen.co.uk...[color=green]
> > Arno,
> >
> > You think it would be a good idea to include another section on your[/color][/color]
site:[color=blue][color=green]
> > how to report abuse to Earthlink? I'm perfectly prepared to help out by
> > writing it.
> >
> >
> > "Rob Oldfield" <blah@blah.com> wrote in message
> > news:43c2dac2$0$23285$db0fefd9@news.zen.co.uk...[color=darkred]
> >> Incidentally Steve, I was just browsing Arno's site when I noticed a[/color][/color][/color]
mail[color=blue][color=green][color=darkred]
> >> from you to a previous prospective client including the phrase: "You[/color][/color][/color]
will[color=blue][color=green][color=darkred]
> >> totally own the application; there will be no licensing restrictions."
> >>
> >> Did you change your standard terms, or did you ask the owner of this[/color][/color][/color]
code[color=blue][color=green][color=darkred]
> >> for permission to reproduce it here?
> >>
> >>
> >> "PC Datasheet" <nospam@nospam.spam> wrote in message
> >> news:n__vf.4339$%W1.4167@newsread2.news.atl.earthl ink.net...
> >> > An Access user saw my name in a newsgroup and sent me a request for
> >> > help
> >> on
> >> > a project. As part of the project, a list of the dates in a month was
> >> > needed. For anyone needing a list of dates in a month, here is what I
> >> used:
> >> >
> >> > 1. Create a table named TblNumbers with one field named Num and[/color]
> > populate[color=darkred]
> >> > the table with 1 to 31
> >> > 2. Create a query based on TblNumbers
> >> > 3. Pull down Num into the first field of the query.
> >> > 4. Put the following expression in the criteria for Num:
> >> > <=Day(DateSerial(6,1+1,0))
> >> > 5. Put the following expression in the second field of the query:
> >> > MonthDate: DateSerial(6,1,[Num])
> >> > 6. Put the following expression in the third field of the query:
> >> > =Day([MonthDate])
> >> > 7. Put the following expression in the fourth field of the query:
> >> > =Format([MonthDate],"ddd")
> >> > 8. Put the following expression in the fifth field of the query:
> >> > = Format([MonthDate],"dddd")
> >> > 9. Run the query.
> >> >
> >> > The query will return all the dates for this month (January 06) in[/color][/color][/color]
the[color=blue][color=green][color=darkred]
> >> > second column. The third column will contain the day of the month for[/color]
> > each[color=darkred]
> >> > date. The fourth column will contain the three letter abbreviation[/color][/color][/color]
for[color=blue][color=green]
> > the[color=darkred]
> >> > day of the week for each date. The fifth column will contain the[/color][/color][/color]
full[color=blue][color=green][color=darkred]
> >> name
> >> > of the day of the week for each date.
> >> >
> >> > In the DateSerial expression, 6 is the year (06) and 1 is the number[/color][/color][/color]
of[color=blue][color=green][color=darkred]
> >> the
> >> > month. You can make the query return the dates for any year and month
> >> > by
> >> > modifying the DateSerial function to make the 6 and 1 selectable on a
> >> form.
> >> >
> >> >
> >> > --
> >> > PC Datasheet
> >> > Your Resource For Help With Access, Excel And Word[/color]
> > Applications[color=darkred]
> >> > Over 1075 users have come to me from the newsgroups[/color][/color][/color]
requesting[color=blue][color=green][color=darkred]
> >> help
> >> > resource@pcdatasheet.com
> >> >
> >> >
> >>
> >>[/color]
> >
> >[/color]
>
>[/color]


Arno R
Guest
 
Posts: n/a
#15: Jan 10 '06

re: Create A List Of Dates In A Month



"Rob Oldfield" <blah@blah.com> schreef in bericht news:43c2fd42$0$23285$db0fefd9@news.zen.co.uk...[color=blue]
> Arno,
>
> You think it would be a good idea to include another section on your site:
> how to report abuse to Earthlink? I'm perfectly prepared to help out by
> writing it.[/color]

Hi Rob,

Might be a good idea indeed to add another page to the website.
Thanks for the offer to help writing a 'report-abuse' section.
At the moment I am busy with the page 'what's next', (coming soon indeed) since Steve has made his position perfectly clear.

Please contact me offline.

Arno R

Travis
Guest
 
Posts: n/a
#16: Jan 10 '06

re: Create A List Of Dates In A Month


[some followup newsgroups trimmed]

Rob Oldfield wrote:[color=blue]
> To quote Arno:
>
> Most people here have a common belief that the newsgroups are for *free
> exchange of information*.[/color]

I didn't need to put my credit card details in to read his post, so
that still appears to be the case here.
[color=blue]
> But Steve is a notorious job hunter in these groups, always trying to sell
> his services.[/color]

So?

Common Usenet netiquette stipulates that you don't spam newsgroups with
advertisements, however it is commonly accepted that people are able to
slip in a reference to their web site and commercial services in their
sigs.

The purpose of this netiquette is to keep the noise to signal ratio
acceptably low so the group's primary purpose of information
interchange is not hampered.

Whatever ulterior motives may have been behind his post, the post did
contain useful information and was not on the face of it anything like
spam, therefore it was in keeping with the primary function of these
newsgroups which is to disseminate tips on Access, database design and
VBA.

Travis

Access User
Guest
 
Posts: n/a
#17: Jan 10 '06

re: Create A List Of Dates In A Month


"Travis" <travismorien@yahoo.com> wrote in message
news:1136895071.826976.173130@f14g2000cwb.googlegr oups.com...[color=blue]
>
> Common Usenet netiquette stipulates that you don't spam newsgroups with
> advertisements, however it is commonly accepted that people are able to
> slip in a reference to their web site and commercial services in their
> sigs.
>[/color]

Did you read the AUP for this group before posting that incorrect
information?


Arno R
Guest
 
Posts: n/a
#18: Jan 10 '06

re: Create A List Of Dates In A Month



"Travis" <travismorien@yahoo.com> schreef in bericht news:1136895071.826976.173130@f14g2000cwb.googlegr oups.com...
[color=blue]
> [some followup newsgroups trimmed][/color]

Not very usual for a new user here to do this ...
[color=blue][color=green]
>> But Steve is a notorious job hunter in these groups, always trying to sell
>> his services.[/color][/color]
[color=blue]
> So?[/color]

Seen the website that Rob mentioned? Need one say more?

Please try to understand that it is difficult enough to stop advertising here without comments like yours.
No need to make this thread a long thread.
We have had more than enough annoying, long, off-topic threads.

Arno R
Trevor Best
Guest
 
Posts: n/a
#19: Jan 11 '06

re: Create A List Of Dates In A Month


Rob Oldfield wrote:[color=blue]
> Just in case anyone was also wondering, I had a big money client today who
> paid me a small Caribbean island for coming up with this:
>
> function MultByTwo(d as double)
> MultByTwo=d*2
> end function
>
> I'm particularly proud of that. That's the 57,365th person who's contacted
> me because they've seen my name on a newsgroup this month.[/color]

:-)

I once saw a CV (Resume) from someone who seemed so proud of the fact
that he had done a project using the Mid() function, that one got
"special" consideration from us.
Closed Thread


Similar Microsoft Access / VBA bytes