Excel for Life: 26 new messages in 15 topics

microsoft.public.access.modulesdaovba
http://groups.google.com/group/microsoft.public.access.modulesdaovba?hl=en

microsoft.public.access.modulesdaovba@googlegroups.com

Today's topics:

==============================================================================
TOPIC: Front End connectivity to the network is always trouble
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/ccee521d3a73bb3e?hl=en
==============================================================================

== 1 of 4 ==
Date: Thurs, Aug 28 2008 10:17 am
From: dch3

So if we're running on Windows Server 2003, there shouldn't be any issues
with more than 10 users accessing the backend?

"Michel Walsh" wrote:

> yes to both questions.
>
> Vanderghast, Access MVP
>
>
>

== 2 of 4 ==
Date: Thurs, Aug 28 2008 10:21 am
From: "Michel Walsh"

Sure, if the limit is waved out (as raising the maximum number of users to
99, as example, for that share directory / file ).

Vanderghast, Access MVP

"dch3" <dch3@discussions.microsoft.com> wrote in message
news:D5EA3BEC-765E-41EE-9E26-0FCB42B1A971@microsoft.com...
> So if we're running on Windows Server 2003, there shouldn't be any issues
> with more than 10 users accessing the backend?
>
> "Michel Walsh" wrote:
>
>> yes to both questions.
>>
>> Vanderghast, Access MVP
>>
>>
>>
>

== 3 of 4 ==
Date: Thurs, Aug 28 2008 11:40 am
From: RD

On Wed, 27 Aug 2008 22:06:25 -0700, Frank Situmorang
<hfsitumo2001@yahoo.com> wrote:

>Thanks Michel for your response, may be we need to give more information. The
>OS in our server is Windows 2000 professional. Does it have also limit for
>the user? and coulcd it be the problem, because as I said as soon as I
>recreated again for the same user and untick the option, it works again.

I just checked ... yes, W2K also has the 10 user limit.

== 4 of 4 ==
Date: Thurs, Aug 28 2008 12:24 pm
From: dch3

Any issues we'll just upsize to SQLServer sooner than later.

"Michel Walsh" wrote:

> Sure, if the limit is waved out (as raising the maximum number of users to
> 99, as example, for that share directory / file ).
>
>
> Vanderghast, Access MVP
>
>
> "dch3" <dch3@discussions.microsoft.com> wrote in message
> news:D5EA3BEC-765E-41EE-9E26-0FCB42B1A971@microsoft.com...
> > So if we're running on Windows Server 2003, there shouldn't be any issues
> > with more than 10 users accessing the backend?
> >
> > "Michel Walsh" wrote:
> >
> >> yes to both questions.
> >>
> >> Vanderghast, Access MVP
> >>
> >>
> >>
> >
>
>
>

==============================================================================
TOPIC: FindFirst Problem
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/780ad3d1e4a0534a?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 10:25 am
From: Marshall Barton

Jeefgeorge wrote:

>I fixed it.....
>
>I replced
> .FindFirst "Right([ProjNo],4) =" & """ & Proj & """
>with
> .FindFirst "Right([ProjNo],4) =" & Chr(34) & Proj & Chr(34)
>AND
> .FindFirst "[ProjNo] =" & """ & Proj & """
>with
> .FindFirst "[ProjNo] =" & Chr(34) & Proj & Chr(34)

That is certainly a valid way to do that so no need to make
any other changes.

Your original problem was that you did not have the correct
number of quotes. The basic rule of putting a quote inside
quotes is to use two quotes where you want one quote in the
result.

Note that Chr(34) is the same as """" so you could have
solved the problem by using:
.FindFirst "[ProjNo] =" & """" & Proj & """"

You could also have combined the first set of quotes into
the initial part of the expression:

.FindFirst "[ProjNo] =""" & Proj & """"

--
Marsh
MVP [MS Access]

==============================================================================
TOPIC: If Else Statement in VBA
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/a742da2d52b68eb7?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 10:47 am
From: John Spencer

You could write that as

Public Function getquarter(Mnth)

If IsNumeric(Mnth) = False then
'Note the first comparison must return
'results in another line
getQuarter = Null
ElseIf Mnth = 1 Then:getquarter = 1
ElseIf Mnth = 2 Then: getquarter = 1
ElseIf Mnth = 3 Then: getquarter = 1
ElseIf Mnth = 4 Then: getquarter = 2
ElseIf Mnth = 5 Then: getquarter = 2
ElseIf Mnth = 6 Then: getquarter = 2
ElseIf Mnth = 7 Then: getquarter = 3
ElseIf Mnth = 8 Then: getquarter = 3
ElseIf Mnth = 9 Then: getquarter = 3
ElseIf Mnth = 10 Then: getquarter = 4
ElseIf Mnth = 11 Then: getquarter = 4
ElseIf Mnth = 12 Then: getquarter = 4
Else: getquarter = Null
End If

End Function

As noted elsewhere there Are better methods to get the quarter.

John Spencer
Access MVP 2002-2005, 2007-2008
The Hilltop Institute
University of Maryland Baltimore County

Victoria wrote:
> Unfortunately, it's been 9 months since I've really worked in access and now
> for some reason I can't get a simple statement to work! Help! What am I doing
> wrong?
>
> I took a date field, calculated month from it, which is a numerical value
> and am now trying to translate it to quarter. What am I doing wrong?
>
> Public Function getquarter(Mnth)
>
> If Mnth = 1 Then getquarter = 1
> ElseIf Mnth = 2 Then getquarter = 1
> ElseIf Mnth = 3 Then getquarter = 1
> ElseIf Mnth = 4 Then getquarter = 2
> ElseIf Mnth = 5 Then getquarter = 2
> ElseIf Mnth = 6 Then getquarter = 2
> ElseIf Mnth = 7 Then getquarter = 3
> ElseIf Mnth = 8 Then getquarter = 3
> ElseIf Mnth = 9 Then getquarter = 3
> ElseIf Mnth = 10 Then getquarter = 4
> ElseIf Mnth = 11 Then getquarter = 4
> ElseIf Mnth = 12 Then getquarter = 4
> End If
> End Function
>
>
> Thanks!
> -Victoria
> avvigil@yahoo.com

==============================================================================
TOPIC: Help with "dll" files.
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/2de9a73de2226a17?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 10:54 am
From: "Tony Toews [MVP]"

FatMan <FatMan@discussions.microsoft.com> wrote:

>If I was to move up to Access 2007 would the chance of having this type of
>problem decrease? I have been told that the run time for Access 2007 is free
>for distribution. Is this correct?

Yes. Also see Microsoft Access (Office) Developer Edition FAQ
http://www.granite.ab.ca/access/developereditionfaq.htm

>If my database program runs in Access
>2000 is it safe to assume that it should run in Access 2007 with out a
>problem?

No. There are little quirks you have to be aware of especially if
Microsoft has tightened up the behavior of some things. Allen Browne
has a page on these quirks. www.allenbrowne.com. But once you're
past the quirks it won't be too bad.

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/

==============================================================================
TOPIC: Name AutoCorrect Save Failures
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/dbb4e2b3f5992a21?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 11:27 am
From: Jeefgeorge

Thanks, Worked Great

"Klatuu" wrote:

> Turn AutoCorrect off. Don't use it. It is buggy and causes problems.
>
> You may want to read the info at this site:
> http://allenbrowne.com/bug-03.html
> --
> Dave Hargis, Microsoft Access MVP
>
>
> "Jeefgeorge" wrote:
>
> > When I run a TransferSpreadsheet command, a [Name AutoCorrect Save Failures]
> > table is created.
> >
> > Object Name: BidTabData
> > Object Type: Table
> > Failure Reason: Could not save the object
> > Time:
> >
> > Code:
> > ...
> > Tble = "BidTabData"
> > Path = ahtCommonFileOpenSave...
> > CurBid = 1
> > Do While CurBid <= 7
> > Rnge = "Bid" & CurBid
> > DoCmd.TransferSpreadsheet acImport, 8, Tble, Path, -1, Rnge
> > CurBid = CurBid + 1
> > Loop
> > ...
> >
> > I think this table is created since the range is 250 rows long, but some
> > rows are blank. Some spreadsheets have 7 rows, some have 100. I used a range
> > of 250 rows because that is an extreme max to insert. The blank rows are not
> > imported, because no primary key is present. I think the error is because
> > these blank rows are not added to the table. Is there a way to not flag not
> > saving blank rows as an error? Or is there something else generateing this
> > table?

==============================================================================
TOPIC: Search Check Boxes on a Form Using Check boxes on a search For
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/1581abdd7c486e13?hl=en
==============================================================================

== 1 of 6 ==
Date: Thurs, Aug 28 2008 11:38 am
From: BIS-SISA

Hi,

Happy to find this thread and I was successful in getting the code to work
in my form but am puzzled by the filtered results.

I have 1276 records that when I filter them it shows 1265 records. My goal
is to see the 11 records filtered out. Any suggestions??

Thanks!

"Klatuu" wrote:

> Sure, no problem.
>
> First, add a command button to your form. Give it the name cmdSetFilter.
> Set the Caption to Set Filter
> Now, to add the code, select the Events tab of the properties dialog. Find
> the text box labled On Click.
> Click on the small command button just to the right of the text box.
> Choose Code Builder from the list that will pop up.
> The Visual Basic Editor (VBE) will open and you will see:
> Paste the code into the editor where the cursor is.
>
> Private Sub cmdSetFilter_Click()
> |
> End Sub
>
> Now, to use you check box name as an example. I put it in as the first
> field name. Now let's get clear on terminology. When you say Field, that
> means a field in a table or query. When you refer to a check box on a form,
> that is a Control. So based on your statement, I am assuming [Business and
> Enterprise] is the name of a field in the form's record source. Each of your
> Check Boxes is probably bound to a field in the form's record source, so you
> use the name of the field and the name of the control in the comparison. You
> do it for each check box you want to include in th your filter. So:
> v----Name of Field---------v v--Name of Control bound to field
> "[Business and Enterprise] = " & Me.chkOne
>
>
> Dim strFitler As String
>
> If Me.cmdSetFilter.Caption = "Set Filter" Then
> strFilter = "[Business and Enterprise] = " & Me.chkOne & " AND
> [Field2] = " &
> Me.chkTwo & " AND [Field3] = " & Me.chkThree
> Me.Filter = strFilter
> Me.FilterOn = True
> Me.cmdSetFilter.Caption = "Clear Filter"
> Else
> Me.FilterOn = False
> Me.cmdSetFilter.Caption = "Set Filter"
> End If
>
> --
> Dave Hargis, Microsoft Access MVP

== 2 of 6 ==
Date: Thurs, Aug 28 2008 11:44 am
From: Klatuu

Well, you obviously have the logic working correctly, it would just be how
you are identify the filtering values.

If you can give me some details on what you are doing, perhaps we can make
it work for you.
--
Dave Hargis, Microsoft Access MVP

"BIS-SISA" wrote:

> Hi,
>
> Happy to find this thread and I was successful in getting the code to work
> in my form but am puzzled by the filtered results.
>
> I have 1276 records that when I filter them it shows 1265 records. My goal
> is to see the 11 records filtered out. Any suggestions??
>
> Thanks!
>
> "Klatuu" wrote:
>
> > Sure, no problem.
> >
> > First, add a command button to your form. Give it the name cmdSetFilter.
> > Set the Caption to Set Filter
> > Now, to add the code, select the Events tab of the properties dialog. Find
> > the text box labled On Click.
> > Click on the small command button just to the right of the text box.
> > Choose Code Builder from the list that will pop up.
> > The Visual Basic Editor (VBE) will open and you will see:
> > Paste the code into the editor where the cursor is.
> >
> > Private Sub cmdSetFilter_Click()
> > |
> > End Sub
> >
> > Now, to use you check box name as an example. I put it in as the first
> > field name. Now let's get clear on terminology. When you say Field, that
> > means a field in a table or query. When you refer to a check box on a form,
> > that is a Control. So based on your statement, I am assuming [Business and
> > Enterprise] is the name of a field in the form's record source. Each of your
> > Check Boxes is probably bound to a field in the form's record source, so you
> > use the name of the field and the name of the control in the comparison. You
> > do it for each check box you want to include in th your filter. So:
> > v----Name of Field---------v v--Name of Control bound to field
> > "[Business and Enterprise] = " & Me.chkOne
> >
> >
> > Dim strFitler As String
> >
> > If Me.cmdSetFilter.Caption = "Set Filter" Then
> > strFilter = "[Business and Enterprise] = " & Me.chkOne & " AND
> > [Field2] = " &
> > Me.chkTwo & " AND [Field3] = " & Me.chkThree
> > Me.Filter = strFilter
> > Me.FilterOn = True
> > Me.cmdSetFilter.Caption = "Clear Filter"
> > Else
> > Me.FilterOn = False
> > Me.cmdSetFilter.Caption = "Set Filter"
> > End If
> >
> > --
> > Dave Hargis, Microsoft Access MVP

== 3 of 6 ==
Date: Thurs, Aug 28 2008 12:00 pm
From: BIS-SISA

Well first let me say that you are dealing with the coding challenged here
(hence my joy at finding your thread laying out all the steps). Now that I
have disclosed that grievous fact let me try and provide some info that will
be what you need to help me:-)

I have inherited an AC 2000 database that is used to track IT assets. There
are multiple Yes/No controls to identify location/hardware/use. Also the form
is multi-tabbed to breakout information by type (i.e. hardware, software,
maintenance, etc.).

Here is what is working in my dyslexic world, and yes I am dyslexic):

Private Sub cmdFilterBIS_Click()
Dim strFilter As String

If Me.cmdFilterBIS.Caption = "Set BIS Filter" Then
strFilter = "[BIS PC] = " & Me.ysnBIS_PC
Me.Filter = strFilter
Me.FilterOn = True
Me.cmdFilterBIS.Caption = "Clear BIS Filter"
Else
Me.FilterOn = False
Me.cmdFilterBIS.Caption = "Set BIS Filter"
End If

End Sub

The reason I have inserted "BIS" is due to the need that once I have this
filter working I need to create two additional filters for "Education" and
"Health Care".

Any help will be appreciated and your mentoring is very much valued!

Uriel

"Klatuu" wrote:

> Well, you obviously have the logic working correctly, it would just be how
> you are identify the filtering values.
>
> If you can give me some details on what you are doing, perhaps we can make
> it work for you.
> --
> Dave Hargis, Microsoft Access MVP
>
>
> "BIS-SISA" wrote:
>
> > Hi,
> >
> > Happy to find this thread and I was successful in getting the code to work
> > in my form but am puzzled by the filtered results.
> >
> > I have 1276 records that when I filter them it shows 1265 records. My goal
> > is to see the 11 records filtered out. Any suggestions??
> >
> > Thanks!
> >
> > "Klatuu" wrote:
> >
> > > Sure, no problem.
> > >
> > > First, add a command button to your form. Give it the name cmdSetFilter.
> > > Set the Caption to Set Filter
> > > Now, to add the code, select the Events tab of the properties dialog. Find
> > > the text box labled On Click.
> > > Click on the small command button just to the right of the text box.
> > > Choose Code Builder from the list that will pop up.
> > > The Visual Basic Editor (VBE) will open and you will see:
> > > Paste the code into the editor where the cursor is.
> > >
> > > Private Sub cmdSetFilter_Click()
> > > |
> > > End Sub
> > >
> > > Now, to use you check box name as an example. I put it in as the first
> > > field name. Now let's get clear on terminology. When you say Field, that
> > > means a field in a table or query. When you refer to a check box on a form,
> > > that is a Control. So based on your statement, I am assuming [Business and
> > > Enterprise] is the name of a field in the form's record source. Each of your
> > > Check Boxes is probably bound to a field in the form's record source, so you
> > > use the name of the field and the name of the control in the comparison. You
> > > do it for each check box you want to include in th your filter. So:
> > > v----Name of Field---------v v--Name of Control bound to field
> > > "[Business and Enterprise] = " & Me.chkOne
> > >
> > >
> > > Dim strFitler As String
> > >
> > > If Me.cmdSetFilter.Caption = "Set Filter" Then
> > > strFilter = "[Business and Enterprise] = " & Me.chkOne & " AND
> > > [Field2] = " &
> > > Me.chkTwo & " AND [Field3] = " & Me.chkThree
> > > Me.Filter = strFilter
> > > Me.FilterOn = True
> > > Me.cmdSetFilter.Caption = "Clear Filter"
> > > Else
> > > Me.FilterOn = False
> > > Me.cmdSetFilter.Caption = "Set Filter"
> > > End If
> > >
> > > --
> > > Dave Hargis, Microsoft Access MVP

== 4 of 6 ==
Date: Thurs, Aug 28 2008 12:38 pm
From: Klatuu

With this line:
strFilter = "[BIS PC] = " & Me.ysnBIS_PC

What you are doing is filtering your form's recordset based on a field in
the recodset named [BIS PC] being equal to a control on your form name
ysnBIS_PC.

I am guessing from the name of the control it is a check box and that [BIS
PC] is a Yes/No field in your form's recordset. If all of this is correct
then here is what would happen.
If ysnBIS_PC is checked and you apply the filter, then only records where
the field [BIS PC] is True (the value is actually -1) will be included. If,
when you click the button to set the filter and ysnBIS_PC is not checked, you
would have only rows where [BIS PC] is False (0).

If the field and control are not as I assume, please let me know what data
types they are and how you want the filtering to work.
--
Dave Hargis, Microsoft Access MVP

"BIS-SISA" wrote:

> Well first let me say that you are dealing with the coding challenged here
> (hence my joy at finding your thread laying out all the steps). Now that I
> have disclosed that grievous fact let me try and provide some info that will
> be what you need to help me:-)
>
> I have inherited an AC 2000 database that is used to track IT assets. There
> are multiple Yes/No controls to identify location/hardware/use. Also the form
> is multi-tabbed to breakout information by type (i.e. hardware, software,
> maintenance, etc.).
>
> Here is what is working in my dyslexic world, and yes I am dyslexic):
>
> Private Sub cmdFilterBIS_Click()
> Dim strFilter As String
>
> If Me.cmdFilterBIS.Caption = "Set BIS Filter" Then
> strFilter = "[BIS PC] = " & Me.ysnBIS_PC
> Me.Filter = strFilter
> Me.FilterOn = True
> Me.cmdFilterBIS.Caption = "Clear BIS Filter"
> Else
> Me.FilterOn = False
> Me.cmdFilterBIS.Caption = "Set BIS Filter"
> End If
>
> End Sub
>
> The reason I have inserted "BIS" is due to the need that once I have this
> filter working I need to create two additional filters for "Education" and
> "Health Care".
>
> Any help will be appreciated and your mentoring is very much valued!
>
> Uriel
>
> "Klatuu" wrote:
>
> > Well, you obviously have the logic working correctly, it would just be how
> > you are identify the filtering values.
> >
> > If you can give me some details on what you are doing, perhaps we can make
> > it work for you.
> > --
> > Dave Hargis, Microsoft Access MVP
> >
> >
> > "BIS-SISA" wrote:
> >
> > > Hi,
> > >
> > > Happy to find this thread and I was successful in getting the code to work
> > > in my form but am puzzled by the filtered results.
> > >
> > > I have 1276 records that when I filter them it shows 1265 records. My goal
> > > is to see the 11 records filtered out. Any suggestions??
> > >
> > > Thanks!
> > >
> > > "Klatuu" wrote:
> > >
> > > > Sure, no problem.
> > > >
> > > > First, add a command button to your form. Give it the name cmdSetFilter.
> > > > Set the Caption to Set Filter
> > > > Now, to add the code, select the Events tab of the properties dialog. Find
> > > > the text box labled On Click.
> > > > Click on the small command button just to the right of the text box.
> > > > Choose Code Builder from the list that will pop up.
> > > > The Visual Basic Editor (VBE) will open and you will see:
> > > > Paste the code into the editor where the cursor is.
> > > >
> > > > Private Sub cmdSetFilter_Click()
> > > > |
> > > > End Sub
> > > >
> > > > Now, to use you check box name as an example. I put it in as the first
> > > > field name. Now let's get clear on terminology. When you say Field, that
> > > > means a field in a table or query. When you refer to a check box on a form,
> > > > that is a Control. So based on your statement, I am assuming [Business and
> > > > Enterprise] is the name of a field in the form's record source. Each of your
> > > > Check Boxes is probably bound to a field in the form's record source, so you
> > > > use the name of the field and the name of the control in the comparison. You
> > > > do it for each check box you want to include in th your filter. So:
> > > > v----Name of Field---------v v--Name of Control bound to field
> > > > "[Business and Enterprise] = " & Me.chkOne
> > > >
> > > >
> > > > Dim strFitler As String
> > > >
> > > > If Me.cmdSetFilter.Caption = "Set Filter" Then
> > > > strFilter = "[Business and Enterprise] = " & Me.chkOne & " AND
> > > > [Field2] = " &
> > > > Me.chkTwo & " AND [Field3] = " & Me.chkThree
> > > > Me.Filter = strFilter
> > > > Me.FilterOn = True
> > > > Me.cmdSetFilter.Caption = "Clear Filter"
> > > > Else
> > > > Me.FilterOn = False
> > > > Me.cmdSetFilter.Caption = "Set Filter"
> > > > End If
> > > >
> > > > --
> > > > Dave Hargis, Microsoft Access MVP

== 5 of 6 ==
Date: Thurs, Aug 28 2008 12:55 pm
From: BIS-SISA

Yes I think that is right. In the table "System Computer" the field name "BIS
PC" has a data type of "Yes/No". In the form "frmSystemComputerBIS" the
control name is "ysnBIS_PC" and the control source is "BIS PC".

So is that right? I know it's awful that I don't know for sure but there you
have it, the coding challenged live on!

Thanks for the on-going help!!

Uriel

"Klatuu" wrote:

> With this line:
> strFilter = "[BIS PC] = " & Me.ysnBIS_PC
>
> What you are doing is filtering your form's recordset based on a field in
> the recodset named [BIS PC] being equal to a control on your form name
> ysnBIS_PC.
>
> I am guessing from the name of the control it is a check box and that [BIS
> PC] is a Yes/No field in your form's recordset. If all of this is correct
> then here is what would happen.
> If ysnBIS_PC is checked and you apply the filter, then only records where
> the field [BIS PC] is True (the value is actually -1) will be included. If,
> when you click the button to set the filter and ysnBIS_PC is not checked, you
> would have only rows where [BIS PC] is False (0).
>
> If the field and control are not as I assume, please let me know what data
> types they are and how you want the filtering to work.
> --
> Dave Hargis, Microsoft Access MVP
>
>
> "BIS-SISA" wrote:
>
> > Well first let me say that you are dealing with the coding challenged here
> > (hence my joy at finding your thread laying out all the steps). Now that I
> > have disclosed that grievous fact let me try and provide some info that will
> > be what you need to help me:-)
> >
> > I have inherited an AC 2000 database that is used to track IT assets. There
> > are multiple Yes/No controls to identify location/hardware/use. Also the form
> > is multi-tabbed to breakout information by type (i.e. hardware, software,
> > maintenance, etc.).
> >
> > Here is what is working in my dyslexic world, and yes I am dyslexic):
> >
> > Private Sub cmdFilterBIS_Click()
> > Dim strFilter As String
> >
> > If Me.cmdFilterBIS.Caption = "Set BIS Filter" Then
> > strFilter = "[BIS PC] = " & Me.ysnBIS_PC
> > Me.Filter = strFilter
> > Me.FilterOn = True
> > Me.cmdFilterBIS.Caption = "Clear BIS Filter"
> > Else
> > Me.FilterOn = False
> > Me.cmdFilterBIS.Caption = "Set BIS Filter"
> > End If
> >
> > End Sub
> >
> > The reason I have inserted "BIS" is due to the need that once I have this
> > filter working I need to create two additional filters for "Education" and
> > "Health Care".
> >
> > Any help will be appreciated and your mentoring is very much valued!
> >
> > Uriel
> >
> > "Klatuu" wrote:
> >
> > > Well, you obviously have the logic working correctly, it would just be how
> > > you are identify the filtering values.
> > >
> > > If you can give me some details on what you are doing, perhaps we can make
> > > it work for you.
> > > --
> > > Dave Hargis, Microsoft Access MVP
> > >
> > >
> > > "BIS-SISA" wrote:
> > >
> > > > Hi,
> > > >
> > > > Happy to find this thread and I was successful in getting the code to work
> > > > in my form but am puzzled by the filtered results.
> > > >
> > > > I have 1276 records that when I filter them it shows 1265 records. My goal
> > > > is to see the 11 records filtered out. Any suggestions??
> > > >
> > > > Thanks!
> > > >
> > > > "Klatuu" wrote:
> > > >
> > > > > Sure, no problem.
> > > > >
> > > > > First, add a command button to your form. Give it the name cmdSetFilter.
> > > > > Set the Caption to Set Filter
> > > > > Now, to add the code, select the Events tab of the properties dialog. Find
> > > > > the text box labled On Click.
> > > > > Click on the small command button just to the right of the text box.
> > > > > Choose Code Builder from the list that will pop up.
> > > > > The Visual Basic Editor (VBE) will open and you will see:
> > > > > Paste the code into the editor where the cursor is.
> > > > >
> > > > > Private Sub cmdSetFilter_Click()
> > > > > |
> > > > > End Sub
> > > > >
> > > > > Now, to use you check box name as an example. I put it in as the first
> > > > > field name. Now let's get clear on terminology. When you say Field, that
> > > > > means a field in a table or query. When you refer to a check box on a form,
> > > > > that is a Control. So based on your statement, I am assuming [Business and
> > > > > Enterprise] is the name of a field in the form's record source. Each of your
> > > > > Check Boxes is probably bound to a field in the form's record source, so you
> > > > > use the name of the field and the name of the control in the comparison. You
> > > > > do it for each check box you want to include in th your filter. So:
> > > > > v----Name of Field---------v v--Name of Control bound to field
> > > > > "[Business and Enterprise] = " & Me.chkOne
> > > > >
> > > > >
> > > > > Dim strFitler As String
> > > > >
> > > > > If Me.cmdSetFilter.Caption = "Set Filter" Then
> > > > > strFilter = "[Business and Enterprise] = " & Me.chkOne & " AND
> > > > > [Field2] = " &
> > > > > Me.chkTwo & " AND [Field3] = " & Me.chkThree
> > > > > Me.Filter = strFilter
> > > > > Me.FilterOn = True
> > > > > Me.cmdSetFilter.Caption = "Clear Filter"
> > > > > Else
> > > > > Me.FilterOn = False
> > > > > Me.cmdSetFilter.Caption = "Set Filter"
> > > > > End If
> > > > >
> > > > > --
> > > > > Dave Hargis, Microsoft Access MVP

== 6 of 6 ==
Date: Thurs, Aug 28 2008 1:08 pm
From: Klatuu

I just set up a test for for this situation using a yes/no field and a check
box on a form. It worked just fine for me. I don't see a problem with the
code you posted. Here is my version. Note, I would not use default Access
names normally, this was just a test:

Private Sub Command10_Click()
With Me.Command10
If .Caption = "Filter" Then
.Caption = "Filter Off"
Me.Filter = "[iscorporate] = " & Me.chkIsCorporate
Me.FilterOn = True
Else
.Caption = "Filter"
Me.FilterOn = False
End If
End With
End Sub

Functionally, I don't see a difference, but I thought I would send this
along so you can compare to see if I am missing something.
--
Dave Hargis, Microsoft Access MVP

"BIS-SISA" wrote:

> Yes I think that is right. In the table "System Computer" the field name "BIS
> PC" has a data type of "Yes/No". In the form "frmSystemComputerBIS" the
> control name is "ysnBIS_PC" and the control source is "BIS PC".
>
> So is that right? I know it's awful that I don't know for sure but there you
> have it, the coding challenged live on!
>
> Thanks for the on-going help!!
>
> Uriel
>
>
> "Klatuu" wrote:
>
> > With this line:
> > strFilter = "[BIS PC] = " & Me.ysnBIS_PC
> >
> > What you are doing is filtering your form's recordset based on a field in
> > the recodset named [BIS PC] being equal to a control on your form name
> > ysnBIS_PC.
> >
> > I am guessing from the name of the control it is a check box and that [BIS
> > PC] is a Yes/No field in your form's recordset. If all of this is correct
> > then here is what would happen.
> > If ysnBIS_PC is checked and you apply the filter, then only records where
> > the field [BIS PC] is True (the value is actually -1) will be included. If,
> > when you click the button to set the filter and ysnBIS_PC is not checked, you
> > would have only rows where [BIS PC] is False (0).
> >
> > If the field and control are not as I assume, please let me know what data
> > types they are and how you want the filtering to work.
> > --
> > Dave Hargis, Microsoft Access MVP
> >
> >
> > "BIS-SISA" wrote:
> >
> > > Well first let me say that you are dealing with the coding challenged here
> > > (hence my joy at finding your thread laying out all the steps). Now that I
> > > have disclosed that grievous fact let me try and provide some info that will
> > > be what you need to help me:-)
> > >
> > > I have inherited an AC 2000 database that is used to track IT assets. There
> > > are multiple Yes/No controls to identify location/hardware/use. Also the form
> > > is multi-tabbed to breakout information by type (i.e. hardware, software,
> > > maintenance, etc.).
> > >
> > > Here is what is working in my dyslexic world, and yes I am dyslexic):
> > >
> > > Private Sub cmdFilterBIS_Click()
> > > Dim strFilter As String
> > >
> > > If Me.cmdFilterBIS.Caption = "Set BIS Filter" Then
> > > strFilter = "[BIS PC] = " & Me.ysnBIS_PC
> > > Me.Filter = strFilter
> > > Me.FilterOn = True
> > > Me.cmdFilterBIS.Caption = "Clear BIS Filter"
> > > Else
> > > Me.FilterOn = False
> > > Me.cmdFilterBIS.Caption = "Set BIS Filter"
> > > End If
> > >
> > > End Sub
> > >
> > > The reason I have inserted "BIS" is due to the need that once I have this
> > > filter working I need to create two additional filters for "Education" and
> > > "Health Care".
> > >
> > > Any help will be appreciated and your mentoring is very much valued!
> > >
> > > Uriel
> > >
> > > "Klatuu" wrote:
> > >
> > > > Well, you obviously have the logic working correctly, it would just be how
> > > > you are identify the filtering values.
> > > >
> > > > If you can give me some details on what you are doing, perhaps we can make
> > > > it work for you.
> > > > --
> > > > Dave Hargis, Microsoft Access MVP
> > > >
> > > >
> > > > "BIS-SISA" wrote:
> > > >
> > > > > Hi,
> > > > >
> > > > > Happy to find this thread and I was successful in getting the code to work
> > > > > in my form but am puzzled by the filtered results.
> > > > >
> > > > > I have 1276 records that when I filter them it shows 1265 records. My goal
> > > > > is to see the 11 records filtered out. Any suggestions??
> > > > >
> > > > > Thanks!
> > > > >
> > > > > "Klatuu" wrote:
> > > > >
> > > > > > Sure, no problem.
> > > > > >
> > > > > > First, add a command button to your form. Give it the name cmdSetFilter.
> > > > > > Set the Caption to Set Filter
> > > > > > Now, to add the code, select the Events tab of the properties dialog. Find
> > > > > > the text box labled On Click.
> > > > > > Click on the small command button just to the right of the text box.
> > > > > > Choose Code Builder from the list that will pop up.
> > > > > > The Visual Basic Editor (VBE) will open and you will see:
> > > > > > Paste the code into the editor where the cursor is.
> > > > > >
> > > > > > Private Sub cmdSetFilter_Click()
> > > > > > |
> > > > > > End Sub
> > > > > >
> > > > > > Now, to use you check box name as an example. I put it in as the first
> > > > > > field name. Now let's get clear on terminology. When you say Field, that
> > > > > > means a field in a table or query. When you refer to a check box on a form,
> > > > > > that is a Control. So based on your statement, I am assuming [Business and
> > > > > > Enterprise] is the name of a field in the form's record source. Each of your
> > > > > > Check Boxes is probably bound to a field in the form's record source, so you
> > > > > > use the name of the field and the name of the control in the comparison. You
> > > > > > do it for each check box you want to include in th your filter. So:
> > > > > > v----Name of Field---------v v--Name of Control bound to field
> > > > > > "[Business and Enterprise] = " & Me.chkOne
> > > > > >
> > > > > >
> > > > > > Dim strFitler As String
> > > > > >
> > > > > > If Me.cmdSetFilter.Caption = "Set Filter" Then
> > > > > > strFilter = "[Business and Enterprise] = " & Me.chkOne & " AND
> > > > > > [Field2] = " &
> > > > > > Me.chkTwo & " AND [Field3] = " & Me.chkThree
> > > > > > Me.Filter = strFilter
> > > > > > Me.FilterOn = True
> > > > > > Me.cmdSetFilter.Caption = "Clear Filter"
> > > > > > Else
> > > > > > Me.FilterOn = False
> > > > > > Me.cmdSetFilter.Caption = "Set Filter"
> > > > > > End If
> > > > > >
> > > > > > --
> > > > > > Dave Hargis, Microsoft Access MVP

==============================================================================
TOPIC: In a report -Using a calculated field in Select Case causes Error
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/68b28ec3d6158796?hl=en
==============================================================================

== 1 of 4 ==
Date: Thurs, Aug 28 2008 12:02 pm
From: Maverick

I am trying to have certain boxes become visible or not based on the value of
a calculated field in a report. However, it gives me Error 2424 and points to
the calculated field Me.calcOverallRating as the problem. Any ideas why or
how to fix this?

My code is as follows:

Select Case Me.calcOverallRating

Case 0
Me.boxDoesNot.Visible = True

Case 0.5 To 1.4
Me.boxMeets.Visible = True

Case 1.5 To 2.4
Me.boxExceeds.Visible = True

Case 2.5 To 3
Me.boxOutstanding.Visible = True

Case Else
Me.boxDoesNot.Visible = False
Me.boxMeets.Visible = False
Me.boxExceeds.Visible = False
Me.boxOutstanding.Visible = False

End Select

== 2 of 4 ==
Date: Thurs, Aug 28 2008 1:01 pm
From: "Alex Dybenko"

Hi,
where do you run this code? You have to run it in corresponding report's
section format event

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com

"Maverick" <Maverick@discussions.microsoft.com> wrote in message
news:100A6A7C-D6A8-453E-92B8-B886932C027E@microsoft.com...
>I am trying to have certain boxes become visible or not based on the value
>of
> a calculated field in a report. However, it gives me Error 2424 and points
> to
> the calculated field Me.calcOverallRating as the problem. Any ideas why or
> how to fix this?
>
> My code is as follows:
>
> Select Case Me.calcOverallRating
>
> Case 0
> Me.boxDoesNot.Visible = True
>
> Case 0.5 To 1.4
> Me.boxMeets.Visible = True
>
> Case 1.5 To 2.4
> Me.boxExceeds.Visible = True
>
> Case 2.5 To 3
> Me.boxOutstanding.Visible = True
>
> Case Else
> Me.boxDoesNot.Visible = False
> Me.boxMeets.Visible = False
> Me.boxExceeds.Visible = False
> Me.boxOutstanding.Visible = False
>
> End Select

== 3 of 4 ==
Date: Thurs, Aug 28 2008 1:08 pm
From: Maverick

I've tried On Current, On Load and On Open. None work. The control is
available from the list after I type Me. so I know it's a valid control and
not typed incorrectly.

"Alex Dybenko" wrote:

> Hi,
> where do you run this code? You have to run it in corresponding report's
> section format event
>
> --
> Best regards,
> ___________
> Alex Dybenko (MVP)
> http://accessblog.net
> http://www.PointLtd.com
>
> "Maverick" <Maverick@discussions.microsoft.com> wrote in message
> news:100A6A7C-D6A8-453E-92B8-B886932C027E@microsoft.com...
> >I am trying to have certain boxes become visible or not based on the value
> >of
> > a calculated field in a report. However, it gives me Error 2424 and points
> > to
> > the calculated field Me.calcOverallRating as the problem. Any ideas why or
> > how to fix this?
> >
> > My code is as follows:
> >
> > Select Case Me.calcOverallRating
> >
> > Case 0
> > Me.boxDoesNot.Visible = True
> >
> > Case 0.5 To 1.4
> > Me.boxMeets.Visible = True
> >
> > Case 1.5 To 2.4
> > Me.boxExceeds.Visible = True
> >
> > Case 2.5 To 3
> > Me.boxOutstanding.Visible = True
> >
> > Case Else
> > Me.boxDoesNot.Visible = False
> > Me.boxMeets.Visible = False
> > Me.boxExceeds.Visible = False
> > Me.boxOutstanding.Visible = False
> >
> > End Select
>
>

== 4 of 4 ==
Date: Thurs, Aug 28 2008 1:23 pm
From: "Alex Dybenko"

Hmm, are we talking about report? not sure it has current event. try Format
even

--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com

"Maverick" <Maverick@discussions.microsoft.com> wrote in message
news:6B0DB2CE-62E5-4D34-80BC-8CCD80269266@microsoft.com...
> I've tried On Current, On Load and On Open. None work. The control is
> available from the list after I type Me. so I know it's a valid control
> and
> not typed incorrectly.
>
> "Alex Dybenko" wrote:
>
>> Hi,
>> where do you run this code? You have to run it in corresponding report's
>> section format event
>>
>> --
>> Best regards,
>> ___________
>> Alex Dybenko (MVP)
>> http://accessblog.net
>> http://www.PointLtd.com
>>
>> "Maverick" <Maverick@discussions.microsoft.com> wrote in message
>> news:100A6A7C-D6A8-453E-92B8-B886932C027E@microsoft.com...
>> >I am trying to have certain boxes become visible or not based on the
>> >value
>> >of
>> > a calculated field in a report. However, it gives me Error 2424 and
>> > points
>> > to
>> > the calculated field Me.calcOverallRating as the problem. Any ideas why
>> > or
>> > how to fix this?
>> >
>> > My code is as follows:
>> >
>> > Select Case Me.calcOverallRating
>> >
>> > Case 0
>> > Me.boxDoesNot.Visible = True
>> >
>> > Case 0.5 To 1.4
>> > Me.boxMeets.Visible = True
>> >
>> > Case 1.5 To 2.4
>> > Me.boxExceeds.Visible = True
>> >
>> > Case 2.5 To 3
>> > Me.boxOutstanding.Visible = True
>> >
>> > Case Else
>> > Me.boxDoesNot.Visible = False
>> > Me.boxMeets.Visible = False
>> > Me.boxExceeds.Visible = False
>> > Me.boxOutstanding.Visible = False
>> >
>> > End Select
>>
>>

==============================================================================
TOPIC: Access to Outlook Via Excel
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/96746cf9b3eb0195?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 12:08 pm
From: dch3

First, what is the intent? Are you trying to generate HTML-formatted emails
from Access? When your user says they don't want to see grid-lines are you
trying to send data formatted as a table in the message?

Second, you cannot, ever, never-in-a-million years, absolutely control what
the user sees due to the wide variety of machines, browsers, email programs
and other what not. You can greatly influence, but absolute control is an
absolute impossibility.

(Now that I'm off my soapbox...)
If you're trying to send HTML formatted email (which I think you are but may
not know it), you can create the HTML directly in Access using the
appropriate HTML tags and then set the .HTMLBody of the MailItem. I'm
assuming that theres a HTML table in the message based on the 'no gridlines'
comment. If so, you'll be using <table><tr><td></td></tr></table> to create
said. In the <table> tag using border=0 to supress the border. At any rate if
you are trying to send an HTML formatted email its not necessary to use
Excel, however you will need a familarity with HTML in order to create the
string to set the .HTML body to. Be aware though MS has chosen to modify the
HTML rendering engine used for Outlook 2007. (You *do not* have to go through
Word to create a HTML message as setting the .HTMLBody is all you have to
do.) As such there are certain tags that can't be used. The basic tags are
still usable, but its the tags such as <object></object> that can no longer
be used. For more information see these articles...

http://msdn.microsoft.com/en-us/library/aa338201.aspx
http://msdn.microsoft.com/en-us/library/aa171418(office.11).aspx
http://msdn.microsoft.com/en-us/library/bb175500.aspx
http://msdn.microsoft.com/en-us/library/bb207133.aspx
http://www.w3schools.com/html/default.asp
Also, you

"Pradeep" wrote:

> Hello,
>
> I am using Ms Access 2003. Per user requirement, I need to format the data
> in a table and paste the same in outlook in such a way the gridlines etc do
> not appear.
>
> So i have written code in VBA (MS Access) which takes bits of information,
> copies it to an excel sheet, formats it per the requirement specifications
> and then moves it to Outlook.
>
> Essentially i am trying to paste data into a outlook mailitem with a word
> document viewer. The pre-requisite for this is:
>
> 1. Ensure that the Edit messages with Microsoft Word 2003 is selected in
> Outlook under the Mail Format tab.
>
> Here is the main segment of code i am using:
>
> Dim objOutlook as object, objMailWindow as object, objInspector as object,
> ObjDoc as word.Document, objExcel as object
>
> set objOutlook= CreateObject("Outlook.Application")
>
> set objMailWindow=objOutlook.MailItem(0)
>
> with ObjMailWindow
> set objInspector=.GetInspector
> set objDoc=objInspector.WordEditor
> End with
>
> Now i move bits of information from Ms Access table into an Excel Workbook
> object, format it per user requirements and then move it to out look with the
> following statement.
>
> objExcel.Selection.Copy
>
> with objDoc
> .Activate
> .Selection.PasteExcelTable False,False,False
> End with
>
> Now the formatting is perfect and it appears as intended in Outllook. But
> when the email is sent, the recepient receives it in a different format where
> in he sees the grid lines.
>
> How do i avoid it. The user wants to see it as it appears without any grid
> lines.
>
> Any help in this regard would be highly appreciated.
>
> Thanks,
>
> Pradeep

==============================================================================
TOPIC: Change recordsource of susequent subforms-TJ
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/5e247a6c6176bb8a?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 12:12 pm
From: ambushsinger

I have a subform with a combo box containing User ID's ("CKENT"). The next
suform will be the user profile with listbox ("Coordinator" or "Inspector")
etc...based on the user id and a check box to show the current profile of the
selected user.
The next subform will be Contract number which shows the current contract
number being worked on.
When I change the User ID ("BWAYNE") the user profile recordsource should
update and populate the user profile and the contract number.
Any ideas???

==============================================================================
TOPIC: Possible to have each procedure called listed?
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/2ed74e7b351f1992?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 12:18 pm
From: markmarko

> Sure, you can always get the history, if you insert a:
>
> Debug.Print "subroutineName here -- start "
>
> at the start of each of your subroutine where their start is to be tracked.

So simple... for some reason, I was fixated on some sort of built-in
functionality.

That would work nicely. Thanks!

==============================================================================
TOPIC: Sending email from access - Reference Stephen Lebans code
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/4790bc6a818ef8d5?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 12:21 pm
From: dch3

I'm not familar with the code that you refer to, however if its using the
Outlook object model to create a MailItem, the .Send Property is the one that
actually sends the email. If its in the code, replace it with .Display.

See...
http://msdn.microsoft.com/en-us/library/microsoft.office.interop.outlook._mailitem.display.aspx

If you need code to actually create the MailItem see...
http://msdn.microsoft.com/en-us/library/aa220082(office.11).aspx

To attach the file, see
http://msdn.microsoft.com/en-us/library/aa210901(office.11).aspx

"Irshad Alam" wrote:

> I have used the code and dll files after downloading from Mr. Stephen Lebans
> website for converting the report to pdf (which have also dynapdf.dll &
> strstorage.dll) . The following code I used which worked perfectly :
>
> Private Sub Label59_Click()
> RepoToPdfWC
> End Sub
>
> Function RepoToPdfWC()
> Dim blRet As Boolean
> blRet = ConvertReportToPDF(Me.Text60, vbNullString,
> "C:\WsImpFiles\MyClaimedPDF\" & "Job-" & Me.JobNo & "-ClaimRef." &
> Me.ClaimRefNo.Value & ".PDF", False)
> End Function
>
> Note : Me.Text60 contains the report name
>
> The above sucessfully converts to pdf and open the pdf into acrobat 5
>
> I want to add more codes and edit on above to get my below requirement
>
> 1 It should not open the acrobat for preview
> 2. it should open outlook express 6 - new email message and attach the above
> created pdf and according to below BUT should not send, so that I can have a
> final view before sending :
>
> Email as below :
>
> From: = mirshadalam@hotmail.com
> To: = irshad2.gthe@ggcompany.com
> CC: = naaeems.gthe@ggcompany.com
> Subject: = "Job-" & Me.JobNo & "-ClaimRef." & Me.ClaimRefNo.Value
> Body = "Reference is made to subject claim, attached pls. find the claim
> form as pdf"
> Bodysecondline="Thanks"
> Bodythirdline="Irshad"
> AttachmentFile="C:\WsImpFiles\MyClaimedPDF\" & "Job-" & Me.JobNo &
> "-ClaimRef." & Me.ClaimRefNo.Value & ".PDF"
>
>
> Note2 : I am using Windows XP svcpack2 and outlook express 6 , ms office 2000
>
> Please advice, it will help me to reduce job time of hours.
>
> Regards
>
> Irshad
>
>
>
>
>
>
>

==============================================================================
TOPIC: Parse Table Names from Query Def SQL
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/17e9d9c3e5f0f561?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 12:23 pm
From: Leon J

Thanks for the reply, and it's great as far as it goes. What I'm really
looking for (and couldn't find after searching for over an hour myself) is if
someome has already written the parsing code, especially with whatever
recursion or similar method that is needed to get to table names within
subqueries.

Thanks again for getting me going.

"Alex Dybenko" wrote:

> Hi,
> I think I saw such routine in Access developers handbook, basic idea is that
> you parse query SQL and get tables/queries name from there.
> perhaps this will help:
> http://www.vbforums.com/archive/index.php/t-314247.html
>
> --
> Best regards,
> ___________
> Alex Dybenko (MVP)
> http://accessblog.net
> http://www.PointLtd.com
>
> "Leon J" <Leon J@discussions.microsoft.com> wrote in message
> news:703644D7-E23C-47D3-A396-30888FE7FF02@microsoft.com...
> >I would like to be able to determine all the tables that are referenced
> >with
> > in a querydef (and any subqueries within it, too). Is there a written
> > library for this or has someone written a routine to do it?
> >
> > Thanks for any help,
> >
> > Leon
> >
>
>

==============================================================================
TOPIC: Access and Web Development
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/62e7f93a47b4ec79?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 12:57 pm
From: "Alex Dybenko"

Hi,
not exactly. With SharePoint you can create tables (called lists in
SharePoint) and make web forms so users can enter information there.
Then you can link access mdb to that lists, so same time you can enter data
in access.
of course there are some limitations with these lists.
--
Best regards,
___________
Alex Dybenko (MVP)
http://accessblog.net
http://www.PointLtd.com

"FatMan" <FatMan@discussions.microsoft.com> wrote in message
news:C021DFB4-B764-40A5-BB77-CBD307FD75CE@microsoft.com...
> Alex:
> Are you saying that I can use SharePoint server on a server that is
> available to my users (outside of the company) so they can gain access to
> my
> database program? What would the meechanics be to accomplish something
> like
> this? I have no experience with SharPoint server.
>
> Thanks for your comments,
> FatMan
>
> "Alex Dybenko" wrote:
>
>> Hi,
>> you can also consider using SharePoint server and then link its tables to
>> access. no need to program at all.
>>
>> --
>> Best regards,
>> ___________
>> Alex Dybenko (MVP)
>> http://accessblog.net
>> http://www.PointLtd.com
>>
>> "FatMan" <FatMan@discussions.microsoft.com> wrote in message
>> news:6EFCAFD2-3EC5-404E-B429-A75E610D0BDB@microsoft.com...
>> > Rick:
>> > Thanks for the comments.
>> >
>> > Yes, it is a new web server and whatever language will be used to
>> > complete
>> > the interface between the web and my existing access database will need
>> > to
>> > be
>> > learnt. I have done some searches at the local (Canadian)
>> > universities/colleges and have found courses being offered in Java, C,
>> > C++
>> > and C# but not ASP.net. As I have said I have searched Canadian
>> > universities/colleges for online courses but do not/will not limit
>> > myself
>> > to
>> > Canadian schools if someone knows of a good language and course to go
>> > with
>> > it.
>> >
>> > Do you know of a good course in ASP.net?
>> >
>> > Thanks,
>> > FatMan
>> >
>> > "Rick Brandt" wrote:
>> >
>> >> FatMan wrote:
>> >> > Hi all:
>> >> > I have a database program that I would like to add a web interface
>> >> > for. That is to say I would like users to be able to navigate to my
>> >> > database through the web, log into the interface and
>> >> > add/modify/delete records that pertain only to them.
>> >> >
>> >> > The database and code is ready to go but I would like to hear what
>> >> > peoples thoughts and opinions are as to what programming language is
>> >> > best to use for the web interface and why? Should I use Java, C,
>> >> > C++, C#, etc.
>> >> >
>> >> > All replies are greatly appreciated.
>> >>
>> >> What is already in place? Do you already have a web server or will
>> >> you
>> >> be
>> >> setting up a new one? If an existing one you will need to see which
>> >> of
>> >> those it will support and which would require changes.
>> >>
>> >> Which technology/language are you already familiar with? That would
>> >> be
>> >> the
>> >> best choice. If you are familiar with none of them I'm sure
>> >> representatives/advocates of each would provide many reasons why their
>> >> preferred platform is the one you should use. I imagine that ASP.Net
>> >> would
>> >> be among the easiest to learn from scratch. At least for someone
>> >> already
>> >> famiiar with other MS development tools.
>> >>
>> >> --
>> >> Rick Brandt, Microsoft Access MVP
>> >> Email (as appropriate) to...
>> >> RBrandt at Hunter dot com
>> >>
>> >>
>> >>
>>
>>

==============================================================================
TOPIC: Create Code to have a table field formatted
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/81a0748e72af3ae7?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 1:10 pm
From: "Dirk Goldgar"

"Sondra" <Sondra@discussions.microsoft.com> wrote in message
news:651EC9DF-40A4-427B-B68A-A6C170073EB3@microsoft.com...
> Dirk:
>
> Only the time shows in the mailmerge. I'm usinhg the tbl_DSCRMerge for
> the
> word document mailmerge process.
>
> I've checked the formatting of the field in tbl_DSCRMerger and it is a
> date/time field and the formatting is blank.

At this point I'm at a loss. *Something* is formatting the field as a time,
not as a date. My best guess now is that it's something in the options of
the mail-merge. One possibility is that there's a formatting option applied
to the merge field in the Word document. I'm not an expert on Word, but I
gather that you can select the merge fields in the document and press
Shift+F9 to see their coding. Then you can add or remove a format string.
See the discussion thread at this link:

http://www.microsoft.com/office/community/en-us/default.mspx?dg=microsoft.public.word.mailmerge.fields&mid=4edd6841-3608-43d1-8509-eee097d736c2&sloc=en-us

That would be one possibility.

--
Dirk Goldgar, MS Access MVP
www.datagnostics.com

(please reply to the newsgroup)

==============================================================================
TOPIC: DCount multiple criteria (date range and text field)
http://groups.google.com/group/microsoft.public.access.modulesdaovba/browse_thread/thread/0bfcc448f5065a8b?hl=en
==============================================================================

== 1 of 1 ==
Date: Thurs, Aug 28 2008 1:23 pm
From: KenR

I am trying to count the number of records in a table that meet a specified
date/time range in one field (EntryDate) and the username in a second field
(EntryBy).

'***********
Dim dtMin As Date
Dim dtmax As Date
Dim stUser As String
Dim intArrived As Integer
stUser = CurrentUser()
dtMin = #8/28/2008 9:05:01 AM#
dtmax = #8/28/2008 9:59:59 AM#
intArrived = DCount("*", "[Details]", "[EntryDate] Between #' & dtMin & '#
And #' & dtmax & '#' And [EntryBy] = stUser)
'******************

I get a syntax error when I try it, and can't figure out the correct syntax.

I'm using these static values in dtMin and dtMax for testing purposes; the
live code uses dMin and dMax functions to determine live values.

"Details" is the table
"EntryDate" is a date/time field with a general date format
"EntryBy" is a text field with 15 characters max

This code:
*********
intArrived = DCount("ID", "Details", "ShortEntryDate Between #" & dtMin & "#
And #" & dtmax & "#")
*********
works fine , but doesn't add the second criterion (current user) to find the
correct records, so the count includes records entered in that date range by
another person.

Can anyone help me with the syntax?

Thanks

KenR

==============================================================================

You received this message because you are subscribed to the Google Groups "microsoft.public.access.modulesdaovba"
group.

To post to this group, visit http://groups.google.com/group/microsoft.public.access.modulesdaovba?hl=en

To unsubscribe from this group, send email to microsoft.public.access.modulesdaovba+unsubscribe@googlegroups.com

To change the way you get mail from this group, visit:
http://groups.google.com/group/microsoft.public.access.modulesdaovba/subscribe?hl=en

To report abuse, send email explaining the problem to abuse@googlegroups.com

==============================================================================
Google Groups: http://groups.google.com?hl=en