Recent content by spike250

Many thanks to StarGrabber and Pat Hartman, I managed to figure it out with your help.

Hi, I am pretty new to access and I am trying to import a custom text file in VBA, I have tried searching but most articles discuss delimited text files. I'm using Access 2003 Text File contents Line 1: Authorisation 1 Line 2: ----------------- Line 3: A,00.0000001.Y Line 4: B,00.0000002.Z...

Hi, I have been searching through google to find an answer to my problem with no luck so far so I hope someone will be able to help me or point me in the right direction. Problem; In access I have 10 different reports set up, so that when users enter data and click print, access then runs...

Hi, Thanks for the quick reply. Works a treat. Thanks again. Spike :cool:

Hi all, I have the following code and most of it works apart from the last part to add an * to the end of the line. Does anyone have any idea how I can get it to add the * at the end of the text box. It displays the first one but not the last one? txtLabel1 = "*IQA" & Format(txtLabel1...

Hi Folks, I am not sure if this can be done but if it can could someone please point me in the right direct? I have one form that the user fills in; what I need is depending on the entry selected in a combo box is to have either a sub form or another form to open where further details can be...

Hi, I have a report with a text box that pulls through a test that is request, this is hidden on the report as I also have x3 check boxes on the report for certain tests. For Example: If test displayed is 123 the check box for that test has a control value of =[Test]="123" Which then ticks the...

Here's the code, Sorry about the length - not sure what you will need as I am new to Access. Private Sub cmdSearch_Click() Dim strWhere As String 'The criteria string. Dim lngLen As Long 'Length of the criteria string to append to. Const...

Hi All, I have the following code behind a search form which displays all the correct results. The problem I am having is that the record count function isnt working so it's not expanding the form correctly. Any help would be great. Thanks Spike :confused::confused::confused:

Thanks for the reply, Not sure if I made the proplem clear enough to begin with. There are three combo box in line and the user tabs down through them, When they get to the third this is where I need the code; If cboTestG & cboResultsC are both blank to bring up message box saying "You...

I have managed to write the following code, but I cannot get it to work correctly? Private Sub cboTestG_Exit(Cancel As Integer) If Me.cboTestG = "" Then Me.cboResultsC = True Else MsgBox "Please Enter A Result", vbOKOnly, Mandatory If Me.cboTestG = True Then Me.cboResultsC = "" Else MsgBox...

Hi All, I have two combo boxes on my form called; (along with other text boxes) cboTestG cboResultsC What I am trying to do is to prevent users from leaving both combo boxes blank. something like the below but i'm not sure how to put this into code? If cboTestG is blank then cboResultsC...

Hi, Thanks to those who replied. I managed to get it to work by, 1. Changing enabled option under the Data Properties of the field to NO 2. Adding the following to the Add New Record Command Button; Me.DateScanned.Enabled = True Me.C.Enabled = True Me.V.Enabled = True Me.Old_K.Enabled =...

Hi, No I'm Using A Single Form. Spike

Hi All, I have the following code behind the OnForm Open Event Private Sub Form_Open(Cancel As Integer) Me.Date.Enabled = False Me.C.Enabled = False Me.V.Enabled = False Me.Old_K.Enabled = False Me.D.Enabled = False End Sub And On the command button to add new record I have the opposite to...