473,405 Members | 2,185 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,405 software developers and data experts.

syntax error

56
How can I tie the users shortname to this code. so it comes back with the results that only apply to them.

Dim pastdue As Integer
Dim current As Integer
Dim tot As Integer

nodate = DCount("*", "TARA", "isNull(penddte)")
pastdue = DCount("*", "TARA", "penddte < date()")
current = DCount("*", "TARA", "penddte >= date()")
tot = DCount("*", "TARA")

Debug.Print nodate, pastdue, current, tot
Me.message = "You have " & tot & " items with " & pastdue & " past due, " & current & " current and " & nodate & " with no pending date"


End Sub


Right now it totals the entire database. I have a text box called txtusername that captures the users shortname when they login (using a function) that same shortname is in the maintable and that field is called Login id.

So what I would want to say is: count the number of items where the "penddte"(another field in the maintable) isnull and the txtusername is = to the field called loginid. I don't think I have my syntax correct. i get an cancell operation error.
nodate = DCount("*", "TARA", "isNull(penddte)" & " and [loginID]= " & Me.txtUserName)
Mar 21 '07 #1
7 1194
MMcCarthy
14,534 Expert Mod 8TB
Try this ...
Expand|Select|Wrap|Line Numbers
  1. nodate = DCount("*", "TARA", "[penddte] Is Null" & " and [loginID]= '" & Me.txtUserName & "'")
Mary
Mar 21 '07 #2
favor08
56
Try this ...
Expand|Select|Wrap|Line Numbers
  1. nodate = DCount("*", "TARA", "[penddte] Is Null" & " and [loginID]= '" & Me.txtUserName & "'")
Mary

thank you, It work on all lines but the last one:

Expand|Select|Wrap|Line Numbers
  1. tot = DCount("*", "TARA" & " and [loginID]= '" & Me.txtUserName & "'")
Mar 21 '07 #3
MMcCarthy
14,534 Expert Mod 8TB
Try this ...

Expand|Select|Wrap|Line Numbers
  1.  tot = DCount("*", "TARA" & "[loginID]= '" & Me.txtUserName & "'")
Mar 21 '07 #4
favor08
56
Try this ...

Expand|Select|Wrap|Line Numbers
  1.  tot = DCount("*", "TARA" & "[loginID]= '" & Me.txtUserName & "'")

I get an error that says the microsoft engine can not find the input table or query "tara[loginid]="myshortname" make sure it exit and it is spelled correcty.

which both are.
Mar 21 '07 #5
MMcCarthy
14,534 Expert Mod 8TB
I get an error that says the microsoft engine can not find the input table or query "tara[loginid]="myshortname" make sure it exit and it is spelled correcty.

which both are.
Sorry my fault for not checking the syntax.

Expand|Select|Wrap|Line Numbers
  1. tot = DCount("*", "TARA", "[loginID]= '" & Me.txtUserName & "'")
Mar 21 '07 #6
favor08
56
Sorry my fault for not checking the syntax.

Expand|Select|Wrap|Line Numbers
  1. tot = DCount("*", "TARA", "[loginID]= '" & Me.txtUserName & "'")

Thank you so much. This works!!
Mar 21 '07 #7
MMcCarthy
14,534 Expert Mod 8TB
You're welcome.
Mar 21 '07 #8

Sign in to post your reply or Sign up for a free account.

Similar topics

1
by: Steve | last post by:
I just spent waaaaaaaaaaaayy too much time trying to track down an error that was incorrectly reported just now, and I would like to see if someone can explain to me why it was reported that way. ...
1
by: Donald Canton | last post by:
Hi, I'm using Bjarne's book to learn C++ and am stuck on the Calc program in Section 6. Everything works fine except when I try to use istringstream to parse a token from the command line. I...
5
by: r.nikhilk | last post by:
Hi, Currently, we are porting C++ applications from 32 bit to 64 bit on AIX platform. (The current version of AIX is 5.3 and xlC verison is 8.0). We are able to compile the applications by...
2
by: david | last post by:
Anyone could give me a hand about this syntax error? Thank you. David Source Code: Dim conn As New SqlConnection(strConn) Dim daAngio As New SqlDataAdapter(strSelectStatement, conn) 'Create a...
3
by: Manuel | last post by:
I'm trying to compile glut 3.7.6 (dowbloaded from official site)using devc++. So I've imported the glut32.dsp into devc++, included manually some headers, and start to compile. It return a very...
1
by: Hari Sekhon | last post by:
I've written an except hook into a script as shown below which works well for the most part and catches exceptions. import sys def myexcepthook(type,value,tb): do something ...
7
by: Josh | last post by:
I have a lot of except Exception, e statements in my code, which poses some problems. One of the biggest is whenever I refactor even the triviallest thing in my code. I would like python to...
7
by: bryant | last post by:
Hi all. I am new to ASP and working in Expression Web. The following query displays the information I need in the gridview for a single record. SELECT "OE_HDR"."ORD_NO", "OE_HDR"."CUST_NAM",...
6
by: muby | last post by:
Hi everybody :) I'm modifying a C++ code in VC++ 2005 my code snippet void BandwidthAllocationScheduler::insert( Message* msg, BOOL* QueueIsFull,
5
Banfa
by: Banfa | last post by:
So I have a little problem, I have a template class and that class contains a template function; now what I want to do is declare that function in the class (or indeed the entire class) as a friend...
0
by: Charles Arthur | last post by:
How do i turn on java script on a villaon, callus and itel keypad mobile phone
1
by: nemocccc | last post by:
hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?
0
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
0
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...
0
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...
0
by: Hystou | last post by:
Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...
0
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...
0
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...
0
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.