I have 12 folders (User1 - User12) located in "c:users..."
When I select a UserName from a combo box in a form e.g. User3 , a list of all files with extensions ".doc" in the respective directory (c:usersuser3*.doc) should render with a hyperlink to the file / s.
I have tried variouse "Select Case" and "FileSearch, FoundFiles" scripts, to no avail.
I'm trying to check a directory for a folder name which has a certain string in it (RecNum)
However the fso object filesys.FolderExists does not take an argument when looking for part of a folder name on a particular path.
What I basically want to do is look in a directory for a folder with the RecNum variable as part of the folder name. if it exists open it, if not create it.
Set filesys = CreateObject("Scripting.FileSystemObject") If filesys.FolderExists(targetdir) Then GoTo function_end MkDir targetdir If filesys.FolderExists(copypath) Then filesys.CopyFolder copypath, targetdir End If MsgBox ("folder created") function_end:
I have 3 attachment boxes in my table that appears in a form.each attachment box contains specific files (not specific as in extension such as PDF, JPEG, etc.) but specific as in Company Documents, Certifications, Resumes. The issue is there's a lot of document and I see my database growing (fast)...My question finally is....
Can I use a Hyperlink to open a folder within a specific directory where multiple file are located so i can open the specific file need there RATHER than attaching them in the attachment box individually?.?.....If not how this can be done (no SQL) unless that route is very simple and basic coding.
My thinking would be to place the file path to the documents in the table and hyper link that column in the table, but not knowing exactly how Hyperlinks work I don't think it would actually work..
I am new to VBA and I am looking for some code to use in access 2007 where I can cut the entire contents of a folder on my C: drive and paste it in a separate folder in my C: Drive
I need to return a folders directory to a text box on my forms record called Files_Directory when i click the Browse command button... The folder will have more folders within it along with documents all relivant to the folder selected, hense the need for just the folder directory rather than a file.
...seems such a simple thing to do but I'm completly stuck. Everything I've found on the forum suggests alternatives to doing to above i.e. setting the query that produces the list to produce that report print directly but that wont work for this situation unfortunately.:eek:
Some background.... I have a form (lucky me) in which the user enters 3 category levels and a branch id, they click a button to generate a list of 50 random stock ids so they can be checked at the branch. A preview of the Stockid's (along with description and Stocklevels) is shown in a list on the form. The stock manager then needs to print the list box contents. If the query is re-run it will differ from what is shown in the list so I need to avoid this.
After several days of searching, I haven't been able to find any threads related to this. I'm making a search form that queries a pdf library table. Once a search query is entered, the user is able to open the files from a results form. Currently, I am entering the filenames from the network directory manually into the pdf library table.
For example, I manually enter the following information into the tblPDFLibrary table that contains the fields:
Date added, Filename, File Path, Series, Class, Title.
I was wondering if there's a way to have Access query all the filenames in the directory for me. In other words, if the directory contains the filenames: AccountsPDF, InventoryPDF, CustomerPDF. Can I have Access query all the filenames within the directory and automatically add all the file names (AccountsPDF, InventoryPDF, CustomerPDF) to the Filename field within the tblPDFLibrary table? If I am able to do this, I can code the other fields to populate information because the filename contains all the other field information (except for file path but I can program it insert the UNC path).
I'm trying to automate a process of selecting a set of file/s and move them in a folder. When I click on a button, it should open a current folder that is setup in the code.
Lets say that I have a folder C:documents est, and very time I click on the button, it should open the dialog box with that path so I can select the files from another folder, drag them there and they will be saved in that folder.
This will form part of wider automation that will send an email stating that those file/s where placed in that folder.
I have in the same form where the button is placed, 3 check boxes that needs to be passed to the email as well that one or all the files where placed in the folder.
I'm trying to open a folder based on a BIN nr. This folder could be in a main folder that has diferent subfolder. As there where differnt naming used to create the folderes, one of the things they have always is the BIN nr. It alwasy start with a unique number and maybe I could use it to scan the subfolders and open that one that the BIN nr is equal as in the field BIN.
Now we have serveral 1000th of folders and finding them takes time.
I have a form from one of the gurus on site and I have tried to tweak the code to show a directory per record (Access2000) Its half working I open up the form and get "13- type mismatch"
vDir seems to be empty (I have pt a file in their to veiw) running the cursor over QteNo & qteinsnme - both have what I expect in them (A number and a name respectively) howver Vir seems to be empty and when i debug it oes straight to "Resume Exit_FilesAndDetails) second from bottom line of code copy code below
Private Function FilesAndDetails() On Error GoTo Err_FilesAndDetails
Dim rs As Recordset Dim vDir As Variant Dim sPath As Variant
'Const sPath = "C:Coverex international(Me!QteNo)(Me!QteInsnme) """ ' Const sPath = "C: emp" 'sPath must end with a back slash, sPath = "C:Windows" CurrentDb.Execute "Delete tTempFiles.* from tFiles;"
I'm trying to tie a from into the results from and AD Query. I'm not that experienced with doing this kind of thing so I may be going about this the wrong way. Anyway here's what I've got so far:
Code: Private Sub Form_Open(Cancel As Integer) Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Set cn = New ADODB.Connection With cn .ConnectionString = "Provider=ADSDSOObject;Trusted_Connection=yes;"
[Code] .....
When stepping through the code, it all goes well until it hits the line that actually connects it to the form "Set Me.Recordset = rs".
When this line is executed, Access crashes and attempts to restart.
I have a form that I would like to embed some text that is queried from the internet. I'd like to have a part of this form display this "quote of the day" info in a textbox, and im not sure how to do it.
The link to access the quote is through javascript: <script language="JavaScript" src="http://www.quoteworld.org/quotes.js"></script>
I'm a new Access user and i couldn't figured out how to implement the following:
- I've got a form with buttons on it. These buttons refer to different querries which either displays or changes specific data on the predefined table.
- With a text box (or another thing) I want the user to enter a table name, so that the querries gain portability to work table-independent.
Briefly this is what i want;
-- User should enter a text -- This text should be used to change the TABLENAME in each of the querry
But I don't know how :(
Is there anyone who has time to explain this implementation in detail??
How can I get access to hide certain fields or controls on a form if a certain field has no data?
Allow me to explain further:
I have a form that displays data = frmPlantMain and a associated image = Image1 The image is stored outside of the db as a jpeg and the field in the record source table (Image1) contains a link to the image. For example: C:databasePicture1.jpg
There is also a hidden text box that contains the message "No Image available" = lbl_NoPix This would be displayed in place of the image if no image has been inserted.
I also have a seperate "insert new image" command button = cmdInsertPic
If the current record has a image then I want to have the controls Image1,lbl_NoPix & cmdInsertPic hidden. This seems fairly easy but it gets more complicated now.
If there is no image I would like these controls visable so that the user can add a new image. I would then need the record to be requiried or refreshed to reflect the fact that a new image has been added.
This is where I fall down - I do not know how to tell access to look at the field in the table (Image1) and if there is no linked or associated image then set the visable propertys of controls a,b & c on the form to true.
I hope I have explained my problem correctly and I thank you for your time in advance.
I seem to be having an issue with a split form I've been working on. I created this split form on Monday and it was working just fine but today, I have added a couple minor text boxes. Since then, I can view the form contents in Design View but when I switch to "Form View" or "Layout View", it's all gone minus the logo in the top left corner and the title for the split form.
I have a field on a form that is the results of a dlookup to a table.field. I want the value to be updated when I execute a button that is running a macro. How do I do this automatically, and not have to hit the refresh button?
Okay, so I know how to open variable folders with a button or combobox from Access...but I think I want to have my cake and eat it, too;) Is there any way that an Access form and an Explorer folder can be meshed into one object?
I had an idea where after the user selected a value from the combobox (afterupdate) then the folder corresponding to the combobox value would open (this part I know how to do)...but the folder would open in a specific part of the form. Like binding windows explorer into an object box and then having it jump to different folders as the user changes the combobox selection, aand the user would still be able to drag stuff into WE from the desktop or wherever.
Am I being vague? Can something like this be done? I think if I just knew how to open a folder in a specific place and size I could work something out.
Any help with this would be awesome, I haven't been able to find anything like this in the forums!
I am trying loop through a datasheet so that I can copy the contents of one field into another form.
I have tried using the bellow code to do this on a button click event. However when i run it I get an error telling me that the object doesn't support this property or method. Im not quite sure what this means.
Dim rst As DAO.Recordset Set rst = Forms![Roll Out - Site Form]![Roll Out - Sign items pick list].RecordsetClone Do Until rst.EOF [Roll Out - Sign items added].Form![Code] = [Roll Out - Sign items pick list].[Form]![Item Category]
I would like to create a form to allow the user to choose a location to place a file. I would prefer to have a browse command button so when he/she clicks the windows explorer view opens and the user can select the location. I have seen this done, but I am not sure where to start. If anyone has an example to show me, it would be greatly appreciated.