Recent content by ecniv

3 "1 to many"s Also in the query (when you decide to make one) you can alias the same table multiple times. So you'd need: Main table mainid pos1id pos2id pos3id otherinfo Peoples table PeopleID Other info Query something like: Select maintable.*, qrypos1.*, qrypos2.* from (maintable left...

Use a scanner for the cheques image. Better than a web cam (unless you have the webcam on a brace pointing at a selected area where the cheque rests?). vbforums in the database section there is a sticky thread with a tutorial on putting picture/files into databases including Access, should you...

A different way to open the query as a recordset?? Not heard of that done like that. Are you sure its returned a recordset? Also, if its just filling another table, and there is not likely to be much data, perhaps an Update query could be more appropriate?

You didn't mention it was for Asp. Best to create your own function to put the date as a string on the screen. As to validating, the CDate function still works. So you really need to know what the day is... hmmmm DateDiff function - you could see if that is in there. I'll think on it and post...

You can possibly resize the textbox on got focus and lost focus... You'd have to experiment with it though. something like: public sub txt_GotFocus() txt.width=300 txt.height=30 end sub public sub txt_LostFocus() txt.width=30 txt.height=10 end sub

A person in another forum is doing something like this. He was using Ado and opening a source in that to the xml file and using then sort of like nodes and sub levels properties. Not sure myself. The alternative is to create a text parser that reads through the file and deciphers it as...

um dunno - I was messing with FTP stuff through access and only got as far as connecting and browsing. I ignored the way you are currently doing it and the relative API commands as they didn't allow me to show how much of the file had gone. I couldn't successfully open the file for read/write...

Public Sub SetToolbarsEnable(ByVal blnChangeTo As Boolean) Dim lngToolbars As Long On Error Resume Next '---- reenable the toolbars For lngToolbars = 1 To CommandBars.Count CommandBars(lngToolbars).Enabled = blnChangeTo Next End Sub Turns off all toolbars/menus...

Just a thought - check the functions Round and Fix. They may do what you need. Otherwise try Format(<variable>,"#0.0") Vince

if year(now) mod 4 = 0 then msgbox "Its a leap year!" '---- or isdate("29 Feb " & year(now))

or: strFilePath = "C:\" strFilename="" strFilename = dir$(strFilePath & "*tuesdaydata*.txt",63) do until len(strfilename="") '---- print matched filename to the immediates window debug.print strfilepath & strfilename '---- not sure whether this is needed but I put it in just incase...

Let me get this straight; you want the facility codes to be matched, the month and year from the hours and the month and year from the incidents, with the incidents totalled by the LTI field. Select [qryHours].facilitycode, [qryHours].hoursMonth, [qryHours].hoursYear...

I gathered that it was the amount of changes I was trying to make, not the locking of the record (as its only me and me in the same Access db and no-one else). But it appears its a works machine fault as it ran fine with no tweaking at home and processed the lot. Vince

Probably need a sub/second query to get the counts of LTI with the facility code. Then get the hours table and left join to the query above. The following is rough and you should use the query builder to assist you. Select [hours].facilitycode, [hours].hoursdate, [hours].[hours]...

You are not accounting for nulls... This means your checks are um well pointless as it compares to null and either errors or doesn't compare properly. Try putting this in a module (global) public function nnz(byval varA as variant, byval varB as variant) as variant...