Search results

Solved :D Don't really know how i've done it but my end code is this Private Sub redlineBtn_Click() On Error GoTo Err_redlineBtn_Click Dim intChoice As String Dim jobID As Long Dim FileName As String jobID = Me.jobNumber FileName = siteName & " (" & siteID & ") " &...

Almost there it seems with the code below Private Sub redlineBtn_Click() On Error GoTo Err_redlineBtn_Click Dim intChoice As Integer Dim jobID As Long jobID = Me.jobNumber DoCmd.OpenReport "rpt_redlineText", acViewPreview, , "jobNumber = " & jobID...

The code siteName & " (" & siteID & ") " & "Redline Log.txt" basically gives the file name as shown in the attached pic, it just defaults to a unusable location for everyone, and there's to many variables to use a fixed one

I'm using 2010 With my code as it is currently Private Sub redlineBtn_Click() On Error GoTo Err_redlineBtn_Click Dim jobID As Long jobID = Me.jobNumber DoCmd.OpenReport "rpt_redlineText", acViewPreview, , "jobNumber = " & jobID Reports!rpt_redlineText.Visible = False...

This is the code i entered into the Web Browser control source ="http://maps.googleapis.com/maps/api/staticmap?zoom=18&size=480x480&key=xxxxxxx&maptype=hybrid&style=feature:all|element:all&markers=color:blue%7C" & [lat] & "," & [long] Where key=xxxxxx you need to insert your google api key...

This is my code with the error Private Sub redlineBtn_Click() On Error GoTo Err_redlineBtn_Click Dim jobID As Long jobID = Me.jobNumber DoCmd.OpenReport "rpt_redlineText", acViewPreview, , "jobNumber = " & jobID Reports!rpt_redlineText.Visible = False DoCmd.OutputTo...

Tried using it, how i thought it should be done but i get the error "Method 'FileDialog' of object '_Application' failed"

Seems to be what i'm looking for...any ideas on how to use it in my code?

Hi there, i have an export to txt file on my form which uses the following code (sorry yet to hit post code to do it properly) :( Private Sub redlineBtn_Click() On Error GoTo Err_redlineBtn_Click Dim jobID As Long jobID = Me.jobNumber DoCmd.OpenReport "rpt_redlineText"...

Solved: Although i don't yet have enough posts in order to put the code i used as it contains a link Once i reach the post count in the future i'll come back and edit the solution in to this post

Hi guys, been away from the site for a long time We have a form with the web browser control which links to Google maps and jumps to that location on the map by the lat and long and updates as you jump to each record. (The control is on a form and is only used there) The map itself works...

I have the following code that runs on a button, is it possible to replace siteName in the file paths with a wildcard (due to the mass spelling errors on our server)?? Thanks in advance Private Sub Document_File_Click() Dim str_folder As String Dim str_folder1 As String Dim siteName As String...

well, the error message has gone, the data in the subform still doesn't open on the record, but that's another issue, cheers

just tried it, siteID is a number, but i'm still getting the same error, cheers

just tried it, i still get the same error, thanks tho

It's been a long week and i'm falling asleep at my desk. i keep getting this error with this code, any ideas? :banghead: Private Sub Command63_Click() DoCmd.OpenForm "frm_history" frm_history.Filter = "siteID = " & Me.siteID & "'" frm_history.FilterOn = True End Sub Using access 2010 and cheers