Recent content by hojkoff

The query has 8 records in it for the deckplate query. Other sections of the box have 4 some 2 and so on. I'm really just looking for a way now to slot the end of the path contained in the query field onto the end of the longer path under oPath When I do it like this, cmdLine =...

Right I've managed to push this forward but I've hit other problems, I can get the file to open if I just type the full path into here: stFile = oPath & "\Drawings\1124\1244-63b.pdf" but my problem now is that the path doesn't always end with 63b.pdf. The end part is derived from a query. So...

I'm calling the OpenDeckPlate Document using, Private Sub D1_Click() OpenDeckPlateDocument (1) End Sub I'm still not sure about what to do with, nApp = ShellExecute(nDT, "Open", strFile, "", cmdLine, SW_SHOWNORMAL)

Yeah I realised that I had it in the wrong place just after I'd posted. Sorry about that. I've had a play around with things, can you tell me what this line here does? nApp = ShellExecute(nDT, "Open", strFile, "", "C:\", SW_SHOWNORMAL) what does the part between the comas where C:\ is do...

Deleted my last post, got round that problem, I've typed all that into the code so it looks like this, Private Sub OpenDeckPlateDocument(DeckPlateNumber As Integer) Dim Inset As Variant Dim TheDatabase As Database Dim thisQuery As QueryDef Dim docName As String Dim acrobatApp As...

I'm so confused by all that code I'm a bit of a beginner when it comes to all this, my current VBA looks like this, Function myFolder() myFolder = Left(CurrentDb.Name, InStrRev(CurrentDb.Name, "\")) End Function Private Sub OpenBoxDig() acrobatApp = "C:\Program Files\Adobe\Reader...

I'm trying to open .pdf documents with VBA currently I am using the shell command as such: test = "APPLICATION PATH FOR ACROBAT 9, PDF FILE PATH) procID = shell(test, vbNormalFocus) which works fine, but if the path for acrobat changes or the version changes, which it will inevitably, the...

The database is for a bridge which is split into 80 boxes (as it is a box girder bridge) each box has 8 cantilevers attached to it. Each cantilever has it's own reference number and it's own drawing to go with it which are all in pdf now. I've taken ages entering all this information into a...

I'm prety confused about how to make this line of coding work, My database is called "Box Data Base Complete" so I take it that the code would be writen, Function myFolder() myFolder = Left(Box Data Base Complete.Name, InStrRev(Box Data Base Complete.Name, "THE LOCATION THAT ITS STORED AT...

I've written up a code to open pdf files when buttons are clicked on a forum but I'm having trouble with the paths. I have to burn the access file and all the pdf files to disc so that the disc can be handed round at the office when it's needed. My problem is that when writing the program I've...

A comand that would open the file with the relevent program is a much better way for me to do this. The program is being burnt to disc and then being sent round the company therefore making it hard for me to say where the path to adobe reader is on each individual computer. I have come...

Got it working, not sure what I changed to get it to work but I don't care! Thanks very much for your help! :D :D :D

Cheers mate! That is working for a .txt now but it's not locating the .pdf files correctly.

Thanks for your reply! Just got a few things I don't understand about that, 1. what does the term chr$(34) mean? 2. I forgot to take that acrobatApp line out, this is only a test program that I'm getting to grips with just now, Should probably be best to write it as Private Sub...

Hi all, 1st post so I hope that I don't screw this up! I'm trying to get access to open a related pdf file when you click on a lable in a forum, but I can't seem to get it to locate the file correctly. So far I can get this to work, Private Sub Text0_Click() Dim acrobatApp As String...