Search results

What are you trying to achieve?

Sure thing - am at work at the moment, will post when I get home (and comment some code). Pete

If anyone is interested, I have written up a prototype for sending bulk messages out to members of my rugby club using my phone (unlimited free text messages you see...) and using Dial Up Networking and Bluetooth and AT commands. It's not particularly special, but if you have a semi-decent...

I went down the route of connecting my mobile to my computer with the USB cable (so it kept the phone charged - could use bluetooth also) and sending AT commands to the phone as if it were a modem. Can send and receive messages now from computer, except you'd need a phone and account ($12 a...

It would catch it if you had "Option Explicit" at the top of your code module.

Yeah I can bypass it. What the video player application does is very simple. For each road there is a text reference file and related video file. The text file contains the frame number and the chainage (distance down the road) that that frame is at. So - the video player plays the video...

Ok - slightly different post here but I'll chuck it out there like a fishing line and see if anyone has an opinion or idea. Moderators feel free to move this if required. I work with road condition data. We have a lot of information with regards to the attributes at given intervals down a...

What about 'borrowing' the best of the answers and rolling into one: Function ConvTime(myTime As Double) As Double Dim myMins As Double Dim myDecTime As Double myMins = myTime - Int(myTime) myDecTime = Int(myTime) + ((myMins * 100) / 60) 'converts to decimal time ConvTime =...

So - if I'm reading correctly, it sounds like the text file hasn't finishing writing? If that is the case, then what about something to test to see if the length of the file keeps increasing and pausing until it stops increasing (i.e. it has finished writing)? Something along the lines of (I...

Use the "Where" option on the OpenForm command. Docmd.OpenForm "MyFormName",acNormal,,"ID_B = " & MyPublicVar Assuming MyPublicVar is a number. If not, then you'd have to wrap it in single quotes (for text) or # for a date.

My initial thoughts would be replace it with to replace the Application with a sheet variable because that seems to be what you are referring to. e.g. Dim sht as worksheet set sht = Sheets(1) 'or set sht = Sheets("mySheet") or set sht = Activesheet ... sht.unprotect ("Password")...

Or - if you wanted to trap every single individual record error, you could write a procedure to run every append as a single insert statement and test after the execution of each one to see if it went in! Go on ... go crazy! (no more sugar for me)

You could perhaps try capturing that error number and resuming next? e.g. On Error Goto ErrHandler .... Your Code Exit Sub ErrHandler: Select Case Err.Number Case -2147217900 Resume Next Case Else Msgbox Err.Description End Select Exit Sub Just a...

If I am interpreting correctly from your original post: If [VarX] is the name of a control on your form (which I'm interpreting as is the case because it is wrapped in square brackets), then all you need to do return the value of the control [VarX] is: Dim Variable As String Dim MyResult...

If I understand your problem correctly, here's an example how I have dealt with this before: Say you've got 2 tables: Table1: ID1 (Autonumber, PK), Text1 (Text) Table2: ID2 (Autonumber, PK), ID1 (Number, FK), Text2 (Text) Set up your relationships as per table set up i.e. Table1 (One) to...

Use the OpenArgs. On Form A when opening Form B: DoCmd.OpenForm "FormB", , , , , , "Not New" On Form B Open Event: If Not IsNull(Me.OpenArgs) Then DoCmd.GoToRecord , , acNewRec

Yeah - gave it a crack just before I got your response and as you said, it was a no go. Have come up with a clunky workaround if anyone interested: Used unbound combos (Combo_A_1 to 15 and Combo_B_1 to 15) and unbound textboxes (Text_ID_1 to 15). On Form Load, open recordset based on...

Hello, Has anyone come up for a neat workaround for this? Re-sourcing the cascading combos is not a problem in itself, but it is on a continuous form. Was thinking perhaps a subform in each form on the continuous form perhaps? Any ideas would be greatly appreciated. Regards, Pete

You could try using double quotation marks (") instead: e.g. ssql = ssql & "," & chr(34) & ....... & chr(34) Pete

DoCmd.RunSQL "INSERT INTO MyTable (Field1, Field2) VALUES (Value1, Value2)" or CurrentDB.Execute "INSERT INTO MyTable (Field1, Field2) VALUES (Value1, Value2)"