Modules & VBA :: Change Ending Of All File Paths Of Imported Files

May 26, 2015

I'm currently looking to change the ending of all filepaths of imported files whenever I run the import. I want to change the path ending from .txt to .doc. So basically, the link/path to the file should be got, the ending changed from .txt to .doc and then the path (with the .doc ending) put into the table.

Code:
Private Sub bimportinternal_Click()
On Error Resume Next
strFolderPath = "S:Foo reportsSearchable"
strFolderPathSave = "S:Foo reportsSearchableArchiveword" & objF1.Name
Set objFS = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFS.GetFolder(strFolderPath)
Set objFiles = objFolder.files

[code]...

View Replies


ADVERTISEMENT

Modules & VBA :: Import Csv Files And Rename Them After Import Into (imported) And (failed)

Jul 17, 2015

I have the following piece of code for importing the .csv files from a selected folder and then renaming them into 'imported & filename' if succesful and 'failed & filename' if import failes for whatever reason (bad formating, etc.).

The problem is that the first time it encounters a 'bad' file after another, instead of going again to the Error handler, the command

Code:
DoCmd.TransferText acImportDelim, , "Activitate", filename, True

gives me the default MS Access error, namely 2391. I would like it to go the the Error_handler again ang follow the course of actions and rename the files into 'failed' and 'imported'.

Here's the code:

Sub ImportActivitate()
Dim strFile As String 'Filename's
Dim strFileList() As String ' File Array
Dim intFile As Integer 'Number of files
Dim filename As String, sFullName As String, sFilename As String
DoCmd.SetWarnings False

[code]....

Also, how can I make the routine stop cycling through the files after I renamed them all?

View 3 Replies View Related

Showing File Paths For Attachments In A Report

Jan 28, 2014

My company wants to store both a digital copy and a hard paper copy of the files in the access database. Because of this I need to figure out a way to show in the reports the paths to the attached files so that people reading the paper versions can locate the corresponding files on the computer in the future. I have been searching the internet for several hours and have come up with nothing. Is there a way to do this?

View 1 Replies View Related

Duplicate Records In Query To Join Fields From Several Imported Txt Files

Jan 10, 2008

Hi all,

I have the following issue:

In my job we work with several raw data .txt files exported from Oracle ERP system. These data include information about: inventory, sales, backorders, purchase orders, forecasts, product line.

My goal is to put information from all of these imported txt files together to create an easy to use snapshot file.

The common field between al of these files is the item description. I have an issue where records are repeated for several fields every time the same item description is showed. For example for the same product description the january sales forecast QTY is repeated on several rows because there are several orders for this product description. Is there a way to make forecast QTY appear only once but keep the multiple orders and their information?

Example of current result

http://img178.imageshack.us/img178/5659/currentsu7.th.png (http://img178.imageshack.us/my.php?image=currentsu7.png)

to achieve result

http://img179.imageshack.us/img179/5100/toachievefk4.th.png (http://img179.imageshack.us/my.php?image=toachievefk4.png)

thank you for any comments

View 4 Replies View Related

Forms :: Function To Enable / Disable Button Depending On Files Imported Or Not

May 20, 2015

I have 3 macro importing 3 files, and then another button to process those data.

So, I need a function to enable/disable the button depending on the files have been imported or not.

View 1 Replies View Related

Creating Archive Table For 30 Days To Contain All Data Imported From Multiple Text Files?

Oct 30, 2014

i'm in the process of creating an Access database to import data in text files and then export the data as fixed width text files, this is now working fine

My next step is to be able to setup an "Archive" Table which will hold all the data i have imported across multiple import proceudres for the last 30 days, i then want to be able to "De-Dupe" any files i import against this to ensure i never load duplicate data.

View 1 Replies View Related

Modules & VBA :: Searching Subfolders To Open Files Using File Names

May 19, 2015

I am using Access 2010 with Win-7.Shared, split database with several users.Database Purpose:PM Procedure for Medical Equipment..To be able for the user to copy the file name of 1 or more technical manuals and paste into a table used for a subform on the procedure parent form.Users can then open the related files stored in a common directory that are related to the procedure when later reviewing the procedure .

Problem:File path on the common drive for our group remains static Syspro_5VOL1BIOMEDCOMMONEquipment (Service Manual).The subfolders are not static.There is an unlimited number of sub folders by vendor, model, or make.The subfolders sometimes get renamed as vendors change ownership.The file itself usually does not get renamed.New subfolders get added as needed.Everyone in our group has access to this area of the server.

Question:Is there a way in VBA that when a user opens the procedure record form and dbl-clicks the name of the file in the subform, Access can start at the parent folder and keep searching through all the subfolders until it finds the file?I cannot depend on people in my group to be able to correctly update hyperlinks so I need a way people with no Access knowledge can even use even if its a little slow.

View 4 Replies View Related

Modules & VBA :: Changing Linked Table Paths

Sep 3, 2014

I'm trying to change the table links to a password protected BE DB. I found an example online, which I adapted to my needs. When I set it up to fail to find the normal BE it seems to work as intended until it gets to the line "Tdf.RefreshLink". Then it crashes with a 3031 "Not a valid password" error. The code is:

Code:
Private Sub Form_Open(Cancel As Integer)
Dim Dbs As Database
Dim Tdf As TableDef
Dim Tdfs As TableDefs
Dim NewPathname As String

[Code] ....

I can't find any references or example to relinking a password protected table.

View 8 Replies View Related

Changes To Imported File

Apr 17, 2007

We are in the process of converting from dBase to Access. We have successfully imported one of our data files into Access. When we go in and try to change the field sizes we keep getting an error that there is not enough disk space or memory. Is there a general rule when doing this? We have tried decreasing the amount of records and continue to get the error. When we originally imported the file we did not set a field size limitation so all the text fields in the structure came in at a size of 255. We are trying to change them to their proper size.

If a database is 20MB how much memory or space is required to make changes such as this? The original file contains over 300,000 records.

Any help or direction would be greatly appreciated.

Heather

View 9 Replies View Related

Modules & VBA :: Error Handling / Loop / External Paths

Aug 14, 2014

I am setting up a form to send multiple attachments to an email.I have a query "qry_DwgEmail" that has an ID and a path column. On the form I have a button with the code below in the Click Event.The code below all works fine unless the path is incorrect, so I would like some error handling to be able to either:

1) Stop the code from running and display a message box with my message.
2) Continue the loop and then have the message box display what files could not be found (Preferred).

Note, the following code was taken from one of the forums I am not 100% on what it all means.

Code:
Private Sub btn_CreateEmail_Click()
Dim MyDB As Database
Dim MyRS As Recordset
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookAttach As Outlook.Attachment
Dim TheAttachment As String

[code]....

View 3 Replies View Related

Imported Excel File

Apr 25, 2008

I have imported a worksheet from excel.

I am trying to use query criteria to seach.
the feild I am trying to search was a custom 000-000-000 cell.

I have been trying to use like "001*" but am getting nothing back.

what should I do. Do I need to change the info in excel and start over?

thanks

View 3 Replies View Related

General :: 1.7 GB Text File Could Not Be Imported

Jan 6, 2014

I need to import a text file into access 10, the problem is as i understand it access has a db limit of 255 columns.

The text file is delimited by | symbols. As i tried to import, it shows me to have 267 columns and all the columns are unique and needs to be used for my work.

View 1 Replies View Related

Modules & VBA :: How To Change Name Of File Output Report Is Being Saved As When In PDF

Jun 4, 2014

DoCmd.OutputTo acOutputReport, "Estimate", acFormatPDF, "c:TestMyReport.pdf"

the following code saves my report in a folder called test as a pdf file with the name MyReport. I have a string variable called RepName. How can I make the report get saved under that name.

I tried
DoCmd.OutputTo acOutputReport, "Estimate", acFormatPDF, "c:Test&MyReport&.pdf" but it dosent work.

View 1 Replies View Related

Excel File Imported Into Access Shows Up With More Rows Than Source

Mar 7, 2014

The access file has a lot of rows which do not show on the excel file. The added files in access either have a space before their names, an * before their names, or no name at all. I would attach the new access file but it does not show up on my windows 7 list of files on my computer. It only shows up as a new file on my access program.

View 3 Replies View Related

Modules & VBA :: Loop Through Files And Then Compare With Files In Database Table

Nov 11, 2013

I have to write a code for my database,i have folder with files "pending Review" and a table with column "tblExcelLocation". when i run my database all the files from pending review folder goes to "tblExcelLocation" on a click of button.But,if the files already exists it should not insert those files and insert the rest.For this i tried to write a code but i think i m unable to do that .

Code:
Loop through files in folder
folderspec = "O:QA FilesQC ReportingPending Review"
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folderspec)
Set fc = f.files

[code]...

View 7 Replies View Related

Modules & VBA :: How To Filter Imported Records

Jun 3, 2015

I am importing about 1.5 million records from a .txt file into an Access database. I have the code that splits the records and adds them to the database. However, the database has a 'specialty' table that lists certain specialty codes. The incoming record has a field that is a specialty code. Any way to search the 'specialty' table for the code that is coming in on the record to be added, and then, if the record 'code' is not found, skip it, and if it is found, add it to the database. There are about 70 codes in the 'specialty' table.

View 9 Replies View Related

Modules & VBA :: Trap The Error If Particular Field Not Get Imported Due To Incorrect Format?

Sep 23, 2014

I am importing .txt files into Access table via VBA code (i.e., not via Saved Import Spec). Is there a way to trap the error if a particular field does not get imported due to incorrect format? When you import via Saved Import Spec and there are errors in formatting, Access generates an 'ImportErrors' table, which tells you which fields could not be updated.

Is there a way to generate a similar 'ImportErrors' table with VBA error checking?

View 4 Replies View Related

Import Certain Files Based On File Name

Mar 8, 2006

hi i am trying to import a fe files that have a certain portion of the file name tat is the same.

Since i don't know the syntax in VB this makes it much more harder. I understand the logic, but writing is a chore.

can someone please look at this code and tell me what i am missing?
Code:Private Sub upload_Click()Dim strfile As Stringwirds = "D:RLConverterupload"strfile = Dir("wirds & *.csv")ChDir (wirds) Do While Len(strfile) > 0 If Mid(strfile, 1, 5) = Z56203 Then DoCmd.TransferText acImportDelim, "import spec", "data1", strfile, True Kill strfile strfile = Dir End If Loop End Sub

View 1 Replies View Related

Check If File Exists And Replacing Files

Oct 27, 2005

hey guys

i'm trying to do something that i thought would be pretty simple. what happens is i have 2 files that get used, one by access and one by excel. they are both the same, except if one gets modified then the other doesnt obviously. (theres reasons for having the 2 files).

anyway. in access i want it to pick the newer of the two files (i assume this is using a fso system object?), if the one it normally doesnt use is newer, it should copy the new one over the old one and continue using the one it normally uses.

i cant simply use the other file as another user always has that file open.

any sample code on how to check if things are modifyed at a later date? and copy/pasting using those fso objects?

cheers guys

aaron

View 2 Replies View Related

Calling Databases, And Paths

May 4, 2006

Hello.

I have a database that runs a fews tasks for me me when no one is in the office as the systems are quicker and the admin work tedeous and boring, yet necessay. The problem Im having is in calling a database. The problem stems, i think, from the names on the folder. Unfortunately renaming isnt an option because its got many hundreds of users on the server and I dont have the admin rights besides.

The error is coming on .......

Call Shell("msaccess u: eam-shared-dataRes. SalesOutsourceOutsource_DbsDatabase_StoreOutso urce.mdb").

The error message I get says that u: eam.mdb isnt valid .... when its not. The error is caused presumably by the " - 's " and probable after it passes this the " Res. Sales" will cause an error too. So my question Im asking is, is there anyway to make the path read in full, I've tried preceeding with < and ending with > and "" or even ' but still no joy. Can anyone please help, its getting annoying now. :o :confused:

View 5 Replies View Related

Different Paths For Shared Drive

Feb 2, 2006

Hello all:

I have the following code to retrieve doucments:

strPath = "G:CorpCustomer Files"

Application.FollowHyperlink strPath & "" & textbox1 & "-" & textbox2 & ".doc"

This works fine from my computer because the shared drive on my computer is saved on the G drive.

I tried using the code from a coworker's computer, but got an error because her shared drive is : "X:CorpCustomer Files"

Basically anyone can access the Corp server through any drive depends on how it was mapped.

How do I get around this so that it works from any computer as long as the user has the Corp share drive?

Thanks much.

View 5 Replies View Related

General :: Embedding Icons Instead Of Paths

Dec 4, 2012

I have an access icon (*.ico) file associated with my DB. But when I try to access the database from a place other than my desktop where the icon is located the icon doesn't show up. Is there any way to embed the icon into the application so that when the database is loaded on a different machine the icon loads too..

View 2 Replies View Related

Session Ending

Dec 29, 2004

Can I let a Session variable end when all the pages are closed?

View 1 Replies View Related

General :: Making Paths / Shapes In Access?

Jul 4, 2012

Is it possible to make a path or a shape in access? I'd like to do some graphical representation of some data and change colors of the shapes based on given values that would correlate to the shapes.

View 11 Replies View Related

Count For Week Ending.. In Different Fields

Jan 15, 2007

Morning All!

Boss-Man has a db (humongous) that (along with a zillion other things) tracks which specific tasks have been completed, who has done it and when did they do it.
All tasks will eventually be completed by all employees.

He's got a query that returns all of the dates on which each task has been completed, using each TASK name as a field.

The short version below shows the TASK1 was completed on 1/1/07, 2/7/06 and 2/17/07, TASK2 was completed on 01/05/07,by 2 people on 2/15/07 and again on 02/28/07 and so on.

TASK1***** TASK 2***** TASK 3 ***** TASK 4
1/1/2007 *** 1/5/2007*** 1/13/2007 *** 1/2/2007
2/7/2006 *** 2/15/2007 *** 1/7/2006 *** 1/15/2007
********** 2/15/2007
2/17/2007******
********** 2/28/2007 ********* 2/28/2006

What he would like to do is be able to show how many tasks were completed in any given week, such as:

WEEK ENDING # TASKS
01/06/07 3
01/13/07 1
02/17/07 2

Looks to me like you'd first have to identify the possible WeekEnding dates and then try to total across all the fields, but I've not got a clue how you'd do that.

Is there an easy way to "query the query", work with Week Ending on Saturday, and get the info he's looking for?

Thanks,
BeckieO

View 1 Replies View Related

Multiple Start And Ending Dates

Jul 16, 2007

Hello Everyone,

I would like to run one query that can accommodate entering twelve possible date ranges and output the data all in one query. I could accomplish that by writing 12 queries and attaching each one to a start and end box on a form and then doing a Union Query to obtain one result. I think this might be the long way to accomplish this.

Is there a better way to get the result on one query for multiple Start and end Date Ranges?

Thanks

Joe:D

View 1 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved