OK I think I've worked a solution but I can't test it, I seem to have lost one my reference libriarys. It won't let me Dim the db
Give this a go anyway
Dim db As Database
Dim rs As Recordset
Dim TrackID As Integer
Set db = CurrentDb()
TrackID = 1
Set rs =...
I'm working on some VBA that will increament a varaiable every time the finish and next start miles don't mach, this will produce a uniqe id number for each track, which I believe is the ultimate goal.......?
OK I finaly got where you want to go, I think
Another possible solution
Create new columns NextStartMiles, NewTrack, NewTrackID
Create (and modify) this query
UPDATE Table1 AS t
INNER JOIN Table1 AS n
ON t.ID = (n.ID + 1)
SET n.NextStartMiles = [t]![StartMiles];
You'll have to do it in SQL...
I'm a little bit confused about what your trying to do but I think LEFT([START MILES], 2) might be of help to you.
This would return the frist two numbers of that column, am I on the right lines?
My appologies thats an option you get in SQL Server. Sorry.
I didn't say find and replace, I said Copy and paste Sepecial then transpose it. It would list all the names like this
Appleby David
Atkinson Susan
Blair Brenda
Brown Karen
Which would then import nicely into a single field in Access.
There's absolutly no indication there that you tried to use the fileSystemObject to get the file names.
I didn't test the code first, it's just supposed to be pointing you in a direction that help you.
As it happens Fonts are a bit wierd the way their displayed in explorer, they display the...
This is probably not the best way to go about it but, you can use the fileSystemObject to read the contents of folders.
this script populates a text field (textCheck) with all the files in a folder using the OnClick event
Private Sub CheckImport_Click()
Dim FileName As String
Dim...
The rpoblem isn't with access, it's witht he html.
If your view the source of your web page the links are setup like this
<a href="mailto:">adler@marshfield.k12.wi.us#http://adler@marshfield
</a>
they need to look like this for the address to be carried over
<a...
Whenever I try to select a booking it chucks up the Debugger screen.........?
If you build a query and then base the form on that query. What you appear to have done is to build an unbound form and then written sql in the row source of each element. :-Time consuming......?
Your right, you need IE, I use mozilla by default.
I can't get it to work, both the find and add buttons just error.
Also the table appears to be based on SQL, why not just build a query and base it on that, it'll be a lot easier to manage.
Right clikc the text bax you want he answer in, build event| code bulider.
Dim Value int
'Set value from entered eg. 50
Value = Me!FieldName
If Value < 50 Then
me.ResultFieldName = Value * 4
End If
If Value BETWEEN 51 AND 60 Then
me.ResultFieldName = Value * 5
End If
I would assume the combo boxes need to be bound to a field on the underlying table unless your trying to do something different with them.
what do the combo boxes do?