...Dim strSQL As String
AthChange = False
Dim dbs As Database
Dim rst As Recordset
Set dbs = CurrentDb
strSQL = "select * from athlete "
strSQL = strSQL & " where AthleteID = '" & AthleteID & "'"
Set rst = dbs.OpenRecordset(strSQL)...
I am running access 97, and the round feature is not working. I have changed all of the dollar items in the code to currency, but i'm still running into an issue like below:
SubTotal: 9.00
Tax: 0.41
Total: 9.41
PmtAmt: 9.41
PlusMinus= 0.01 (Should be 0.00)
Any other suggestions?
I have field Zip and Field Zone in my form. I also have a Table Zones.
Table Zones has the following:
ZoneID, ZoneZipStart, ZoneZipEnd, Zone
I would like the form once I leave the Zip field to fill in the Zone field with the Zone that zip code;
For instance if the zip code entered is 20164...
Actually, the color's above work. (vbRed, vbGreen--it's in Access 97). They have a database in use with those for a year now. I am revamping that database now though, actually pulling two together.
The real problem is this. When The PmtAmt and the Total are =, it is showing up as 0.01 in...
I have the following procedure in a form:
Private Sub PlusMinus_Change()
PlusMinus = PmtAmt - Total
Select Case PlusMinus
Case Is < 0
PlusMinus.BackColor = vbRed
InvOnHold = "Y"
Case Is > 0
PlusMinus.BackColor = vbGreen...
I have a table with the field SchoolName. This field has School names such as: Park View Hs, Herndon Hs, Broad Run Hs. I would like to get the Hs to be HS (both letters Capitalized)
I was trying to use:
Right([SchoolName],2) = "HS"
But it is changing the entire field to -1
Why is...
This was perfect! Thanks for taking a moment to figure this one out! Now I will have less trouble exporting the information so we can purge it into Adobe InDesign for our book--any suggestions or preperations that I need for that??
Beth
...asking for the file name
-I will enter ConfLtrDt and then the Month and Year
-And the file will save to:
G:\OE Book\Fulfillment\Confirmation\ **filename i entered in the input box**
I have the following code--but it's not working:
Private Sub ExportConfLtr_Click()
Dim FileName As String...
I have two tables: "Athlete" and "ExtendedBio". They have a One to One relationship at the field AthleteID. There are over 15,000 athelete's in the database, but there are only 6000+ Extended Bio's--and I need to have an extended Bio for each Athlete (even if it's blank)...
I have a form "Fulfillment". On the form I have a command button "cmdPatchReport" with a Macro on the OnClick event to open the PatchReport. When this button is clicked, not only would I like it to run an update querry to update the ItemShipDate to a date that is provided...
...If InvChange Then SaveInvInfo
Set dbs = CurrentDb
If InvNum = "0" Or InvNum = "-1" Then
strSQL = "select * from QOrderQuery where athleteid = '" & AthID & "'"
Else
strSQL = "select * from QOrderQuery where athleteid =...
My organization has a database called "Orders". Our customers are able to order Patches, T-shirts, Plaques, and Certificates. At the moment--I do these all myself--each time that we run fulfillment. I would like to start to automate it though, so it is one less thing that I have to...
I have an unbound form called "Orders", which has about 5 Text Boxes (ShipDt1, ShipDt2, etc...). I have set the format as ShortDate on the form. My issue is that when I have someone's order up--if we have shipped their item to them,the date appears correctly, but in all of the other...
...is set to no.
Both of the above forms are totally unbound, and everything is done by vba. Both forms also refer to the "Athlete" table.
Can someone help me fix my code???
My utltimate goal is to have this label ****SEE NOTES**** appear if the notes field has something in it.
Beth
I wont be able to set the default of the database to all caps. All the data is entered by the data entry specialists in all caps--except for one form, which is awards that kids have one--that is proper case. The downloads from the web are what i'm mostly wanting to change, so if I can add code...
I have two databases that I am bringing together. When the data entry specialists are entering the data, everything they enter is in all caps, but we also download some information from our website--and when that information is downloaded, it is downloaded in whatever format the customer enters...
Okay--I am going to try to put it at the end of the On Load event, that way it will be the last thing that the form tries to do, but I think there is a problem now with my code.
I didn't realize it at first, but you have to press f6 in order to bring the notes section up. The order form and...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.