I have a table with three fields:
SSN
Member #
Case #
I want to create a form that I can search by SSN or Member # which will show all Case #'s known to the SSN or Member #.
A member can only have one SSN and one Member # but many Case #.
I've done this before, but can't remember how, can anyone help?
im responding to the code you submitted to draw lines on a form. I am trying to change it a bit to only draw dots. I have x and y cordinates that I want to draw on the MS form kinda like a scatter graph. So I want to pass values from a table into the function LineX. Then have the function create dots that draw on the for to corespond to the x and y Cordinates. I was wondering if you could help.
thanks in advance
here is the original code
Option Compare Database
Option Explicit
Private Declare Function LineTo Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, _
ByVal Y As Long) As Long
Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, _
ByVal Y As Long, lpPoint As Any) As Long
Private Declare Function apiGetDC Lib "user32" Alias "GetDC" _
(ByVal hWnd As Long) As Long
Private Declare Function apiGetFocus Lib "user32" _
Alias "GetFocus" _
() As Long
Public Function LineX(Ctrl As Control, X As Long, Y As Long, cx As Long, cy As Long)
Dim DC As Long
'device context
Dim hWndCtrl As Long
'bounding control handle
hWndCtrl = fhWnd(Ctrl)
'get control handle
DC = apiGetDC(hWndCtrl)
'get control DC
MoveToEx DC, X, Y, ByVal 0&
'set starting point
LineTo DC, cx, cy
'draw line from starting point to cx, cy
End Function
Private Function fhWnd(ctl As Control) As Long
'use getfocus to retrieve ctrl handle
On Error Resume Next
ctl.SetFocus
If Err Then
fhWnd = 0
Else
fhWnd = apiGetFocus
End If
On Error GoTo 0
End Function
The access import wizard has a convenient form when a fixed-width file is to be imported. The form allows us to click the data to insert an arrow at a position where the next field should begin.
For my project, the wizard has some serious shortcomings, so I am trying to build my own import form. I can capture everything else needed to build an import routine, but I can't figure out, nor find examples of, allowing the user to place column breaks graphically.how to do this without using the wizard? Or rather, like in the wizard?
I am a new user to access and are therefore seeking the assistance of a more experienced user (I'm sure this will be an easy one for all out there).
I want to be able to get records from different tables after the table name has been chosen.
In other words and to be a bit more specific, at the moment in one table I am selecting the tables I want to get information from. Once I select the tables I need to then be able to extract the required data from the selected tables and then put it into a new table with summary totals.
My company does daily, weekly, and monthly drawings using mountains of entry tickets and a barrel that has seen better days. So needless to say this system has to go. I hope to be able to do it digitally.
I would like to do a random number generator to pick the winners based off of a ticket number range. The ticket numbers issued to the customer would correspond to the customer account number. To complicate things I would really love to have the random numbers displayed on the screen so people feel they are watching the randomization pick in progress with the winner name popping up.
I have searched Help for Rnd function, as well as googled. I haven had any luck finding what I need. Is what I am looking to do possible in access? I had something similar in Excel a few years ago but lost it.
Here is a project. I have a grid on a form. its width is 20cm wide and 15cm tall. in the grid are 6 groups of columns (all columns listed are from left to right).
Group 1 - 5cm wide - description
Group 2 to 6 are 30cm wide and represent days. Each group is split into 8 columns which represent hours per working day.
I need to to draw or position a line over the grid depending on what day it is and time. for example, lets say its thursday at 14.30. ( the 8 hour columns run from 8am to 4pm ) it would need to look like this-
So I need to work out the position of of the line depending on the time of of the day in the week. The day can be determined by the column header, the time by the grid....
I have a drawing register database which notes the revisions for all drawings issued. One drawing can be revised several times so I have a details table which notes the revision letter, date issued and the notes for each revision. Using this table I created a max date query to show the latest issue date and revision for each drawing. This query is used for a transmittal form for issuing drawings. Both the form and report is working perfectly.
The TBLTransmittal consists of the following fields
ContractName
IssueDate
SubSup
DwgNo (multi-value checkbox)
Using the TBLDwgRegisterDtls or the query QRYDtldDwgReg (which includes the drawing titles) I would like to create a query that would look up the latest revision at the date of issue and show the revision letter.
I started a query combining TBLTransmittal and TBLDwgRegisterDtls and in the criteria for DateIssued of the TBLSDwgRegisterDtls (which is when the drawing was issued by the architect to the contractor) I put "Not > [IssueDate]". This is filtering the information to show revisions issued up to the date we (the contractor) issued the drawing to our sub-contractor but I need now to pull the max revision only from this information.
Before I go I will give you an example of what I want from the end result
Drawing BK2-02 rev. D was issued by the architect to the contractor on July 17th. This drawing was in-turn issued to our sub-contractor (Sub "A") this Saturday, August 9th. The same drawing was revised this morning and rev. E was issued to Sub "A" today, August 11th.
I want the end report to show that Sub A received Rev. D on 09-08-14 and Rev. E on 11-08-14.
I'm wondering if another max date query on this new query would work? I'll try and see what happens.
I have a couple different reference files that get updated each week. Sometimes there are missing data elements, so I'd like to structure a select query to show me those records that have blank elements but I'd like the similar records to be pulled in as well, so I can make a determination as to how to populate the blank records..
See attached example: I have a client ID reference table that gets populated with forecast owner names (individuals responsible for the customer) from a couple of different sources. Sometimes there are names attached and sometimes the field is blank.
How can I structure a query to show me just those Client ID's that have multiple entries with blank AND non-blank forecast owners? I'd also like to exclude single/multiple records where there are only blank records...
OK, I have been searching around on the fourm for over an hour now...I give up. If this is some where else, I am sorry.
I have a database of maintenance data. There are several columns that are usually filled in, some records have some columns blank. They are formated text because they hold letters and numbers (see pic).
I am using a form to query the table...no problem. The form has text boxes the user filter down the data
The problem comes are with the results of the query. Any record that has a blank column is not retuned. I am using "Like" so that the user can enter in partial codes. I know "like" won't return "null" records.... Help!
Things I have tried:
1)IIF(form field is blank, return table field, else use like command to filter) - returns nothing!
2)Like "*" & [Forms]![Fleetwide_data_Request]![MAL_CD] & "*" returns all records without blanks (i.e. missing data)
what else can I do?
Thanks
Hi guys,
I have been running the same database on numerous systems for 5 years and the user clicks on a button and using this code;
DoCmd.OpenForm "Employee", acNormal
Simple !, this always opened this form blank, without applying filters, ready to accept a new employees details.
But now this no longer works, for no apparent reason?
What happens is that it opens with the form fields filled with the first person in the Databases details instead of being blank.
The only thing that could have changed is that i converted the database to 2003?
Any ideas?
Thank you in advance
When entering information into a blank form, I would like to be able to continue entering information to another additional blank form after my last entry. Is there a way to continue to a blank form after entering information into the previous blank form? I would just like to continue without having to close the entire form and then reopening another form.
View 7 Replies View RelatedI was wondering if there is a way to have a default value in a table field which is dependant on whether there was data enterd in said field or not. For example. I do not want any blank fields on my table instead I want "N/A" in the fields that were not used. I have tried setting the "default value" of the fields to N/A and it does work. The only problem is that all of the fields are filled with N/A automatically and in order to enter data one has to delete or "overwrite" N/A. Is there a way that N/A will be entered ONLY if the field is skipped over and left blank.
"Using way too many quotation marks"
Brad
Thanks
Hi - I have what maybe a relatively easy problem to solve.
I have a list of locations each with a unique id. I also have another table with location details in it. There is a relationship setup between the two tables. However in the first table I have some locations that do not have a match in the second table. Therefore that field is left blank. When create a query to show information from the two tables, any records that have a blank location match field do not get shown in the output. Is there anyway to display records with blank fields?
Thanks
Nick
Hi,
I have created a switchboard for a very basic DB and the first button is "ADD A NEW ENTRY"
When I click on this a form comes up but it bears the data from the first record.
How can I edit it so that a blank form comes up ready to receive data?
Best regards
Keith:(
Hi all
I have a numeric field in a form which initially is set to 0. When the user clicks or tabs to this field, it is blanked out in the got focus event by setting the field to "". This works great. Now, if the user exits the field by clicking elsewhere or tabing out of it, without entering a value, I would like the 0 value to be inserted again. I have tried many things to make this work without any success. Is there someone who knows the right way to do this?
Thanks in advance
Good morning,
How do I print blank forms in Acccess?
tia Terry
Hi,
this is a quickie with regards to query. When I execute a query I get my result back along with a blank record.
How is this prevented ?
my user has a mouse wheel which takes them to the blank record if they move it.
Thanx in advanz.
Niall.
Hello,
I have the following SQL query that runs perfectly. Now I need to put some blank spaces in between for the first expresion (EXPR1). At the moment, as you can see, brings me the 4 fields together.
I have tried using + ' ' + and + " " + but it won't let me as it says that the syntax is Incorrect. What should I use to get spaces?
Thank you!
**********
SET @SQL = 'SELECT dbo.brnch.addr + dbo.brnch.suburb + dbo.brnch.state + dbo.brnch.PIN AS EXPR1, dbo.individuals.posit, dbo.individuals.phn, dbo.company.name
FROM dbo.company INNER JOIN
dbo.brnch ON dbo.company.ID = dbo.brnch.com_ID INNER JOIN
dbo.individuals ON dbo.brnch.br_ID = dbo.individuals.br_ID INNER JOIN
WHERE dbo.brnch.country in (' + @OrderList + ') '
EXEC(@SQL)
Hi I have a query where i search for data based on user names. I am trying to make my query show a message when there is no data from the query.
As this is affecting my form by loading a blank form therefore my EXIT button does not appear and i can not exit the form
Hope this makes sense
Can someone tell me how to insert a blank row after every 4th row of data?
Here is the query:
SELECT B.NAME, B.WORKER, C.[SUB SYS] INTO D
FROM B, C;
data comes back like this
NAMEWORKERSUB SYS
GORDON N PAUL0000ACRT
GORDON N PAUL0000AENF
GORDON N PAUL0000AFIN
GORDON N PAUL0000ARAP
GORDON N PAUL000ATCRT
GORDON N PAUL000ATENF
GORDON N PAUL000ATFIN
GORDON N PAUL000ATRAP
I want it like this
NAMEWORKERSUB SYS
GORDON N PAUL0000ACRT
GORDON N PAUL0000AENF
GORDON N PAUL0000AFIN
GORDON N PAUL0000ARAP
GORDON N PAUL000ATCRT
GORDON N PAUL000ATENF
GORDON N PAUL000ATFIN
GORDON N PAUL000ATRAP
I have a problem which occasionally surfaces.
When trying to use an edit form nothing comes up but a blank page. No fields, nothing. The database is split and when I open it. It shows as read only. The database is only used by myself and another and the other is not accessing it. I've tried closing and opening the database and also compacting and repairing but there is no difference to the particular form.
the problem is cleared up the next day when the db is accessed again.
All other forms are ok to use, and there are now 2 forms which this happens to. Has anyone experienced or seen something similar?
I'm creating a form, from various tables, all linked accordingly. But when I run the form report wizard, I insert all the fields I need, then when I preview the form, its blank?
Ay ideas?
Thanks
In an Input form, how can I blank out certain fields such that the field data is shown, but grayed out, and other fields are shown normally?
View 1 Replies View RelatedI currently have a textbox on a form where on mousedown it launches a calendar and on click it allows me to select a date. It has a validation rule that controls what date can be selected.
However, if I go to a record that has a date entered in the textbox and try to delete the value then the validation rule kicks in. How do I modify it so it will allow me to enter a blank value?
Private Sub Calendar1_Click()
If Calendar1.Value >= (MDate1 - 7) Then
MsgBox "Cancellation must be at least seven days in advance of the first meeting.", vbOKOnly, "Cancellation Date"
Else
CDate1.Value = Calendar1.Value
CDate1.SetFocus
Calendar1.Visible = False
End If
End Sub
Private Sub CDate1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
Calendar1.Visible = True
Calendar1.SetFocus
If Not IsNull(CDate1) Then
Calendar1.Value = CDate1.Value
Else
Calendar1.Value = Date
End If
End Sub
Hi There
Iv created a query that gets its criteria from a search form.
The query returns All values until I put in the parameters
at which point the query returns a blank My SQL is as follows......
WHERE (((Products.catagory) Like "*" & [Forms]![FrmRepOrdersByCatagory]![CbxOrdersByCatSearch])
And ((Orders.orderDate) Between [Forms]![FrmRepOrdersByCatagory]![TxtBegginningDate] And
[Forms]![FrmRepOrdersByCatagory]![TxtEndDate]))
Any advice on the code or what else it could be would be great.
Thanks
I have a table which has a column and some of them are filled and some are blank. I want to fill the blank ones with the previous values, how do I do this. Thanks for any help..
View 4 Replies View Related