Hello, all.
I haven't worked with access in about 2 years, so I'm a bit rusty. I was wondering, what is the easiest way, if any, to output an image stored in an OLE object field to a file, like a bmp to be edited say in paint or something via VB code?
We need to replicate an Access report we have in Microsoft Word. The report has a fixed, small image in the header and so we embedded it in the report (it is not in an external file). To put this image in the Word document the only way we have come up with is shown in the code below.
Code:
Dim apWord As Word.Application
Dim doc As Word.Document
Set apWord = CreateObject("Word.application")
doc.Shapes.AddPicture "G:ImagesSinful Banner.bmp", False, True, 0, 0, 540, 42
Which requires an external image file. We really would like to avoid this. We could make a template Word document, but that too would be an external file. We know how to put this image in a table as an OLE object, but can't find any way to get it from the table into the Word document.
I am having a problem getting Access to output to an excel file.
I want to take a form that I have that has 20 or so records with 6 or 7 fields for each and put it into an excel file that is formated the way I need everythign to look.
I also need it to make the file name such as CCCAAAMMDDYYYY (3 letter company abbreviation,3 letter initials and then todays date) I am thinking that the company abbreviation will be pulled from a query, then initials will be a form that opens, and the date can be pulled from access' date function.
I tried using vb code and doing an output to comand but that did not work.
I am confused someone please help if possible.
Hi all! I'm not sure if this is the correct area to post this in, but hopefully it is!
I have a Microsoft Access database, and I need to output the content of one of the tables in a specific format-the table contains a Name field, a Description field, a URL field and an Alt Text field, and I need it to end up in a text file in this format:
NAME|DESCRIPTION|URL|ALT|
Where each line of the text field is a different product, and the content of each field is separated by the | symbol (whose name escapes me right now).
Anyone that can help?
Kevin
I am using a where condition on printing records from a form to restrict output to the current record. I would also like to write the current record only to a file (rtf). Have set up an output to file button which works but writes all records and there is no code option for a where condition.
I can live with this as it is only for backup but a report per record would be a neater solution.
Is this possible anyone know?
Andy
Hi Guys,
I have 2 tables
tblXRFResults
ResultID
SampleName
Date
SampleDate
a few others not necessary in this
and tblXRFResultsConcentration
ResultID (many records linked to 1 record in tblXRFResults)
Concentration
CompoundName
What I need to set up is a query that will allow me to generate a report that will give an excel like format, with the column headings being the SampleName, followed by the CompoundName(s) from the other table and the "rows" will be corresponding sample name and concentrations.
I am sure this is pretty easy, but I am stumped!
Any help would be greatly appreciated.
Could anyone help with a simple answer please ?
I have an Access db that schedules the sending of emails with attachments.
I run a query on the table that returns all active users
I then need to create a separate file for each active user - in the format as shown below.
Each file is called "ddmmXX.epe"
- where dd=day,mm=month,XX=sequential number starting 01.
The file needs to be formatted ascii text file.
The file extension must be .epe
FORMAT:text
TO:{email}
FROM:{from}
CC:{cc}
SUBJECT:{subject}
ATTACHMENT:{attachment}
BODY:{Message}
All the fields within the {} are fields in the Access table
Each file must then be saved to a directory c:mailout
(eg C:mailout141201.epe)
Sample file would look like this:
FORMAT:text
TO:{harry@aol.com}
FROM:{Mat@abcde.com}
CC:{peter@aol.com}
SUBJECT:{Daily Newsletter}
ATTACHMENT:{c:mailews.zip}
BODY:{Please find attached today's newsletter}
Can anyone help - it would be much appreciated, as I am still learning the slightly more advanced methods of VBA.
Thanks
I would like to print a report file from a database into PDF format.Currently I am using a macro with a "where condition" to select the particular file which currently outputs to the default printer. Converting the macro to VBA reads as follows:
DoCmd.OpenReport "Receipt - full pay new", acViewNormal, "", "[ConsultID]=[Forms]![Payment Record Type]![ConsultID]"
However, if I do an output to PDF file as below, I can't insert a "where condition" to pick the specific file. Instead, it outputs the whole unfiltered report which is 12,000 pages and 29 MB!
DoCmd.OutputTo acOutputReport,"Receipt - full pay new",acFormatPDF,"C:AccessReceiptPDF.pdf"
How to combine the 2, i.e. have the "where condition" to select the particular report page, but output to a PDF file in a selected directory.
I currently have an invoice report that runs through my database which is e-mailed to clients (automatically through vba), and then saved to a specific file path.
I'm currently having an issue with the saving part of the process with certain clients who have illegal characters in their names - for example, "Client / Other Information" where the '/' is causing the save to fail.
I'm trying to find a way to change the file name of the save file for clients with these illegal characters in their names. I would prefer not to take only part of the name (as some clients are listed as "Town/Village of...") but if there is no other way then there is no other way.
The code I'm currently using is as follows:
Code:
Dim strFilePath as String
strFilePath="C:Users" & Environ("UserName") & "DesktopNew Invoices" & Me.Client.Value & ".pdf"
docmd.OutputTo acOutputReport, , "PDFFormat(*.pdf)", strFilePath, False, "", 0, acExportQualityPrint
Hi
At the moment I am trying to send data ( a query) to a CURRENT Excel file, I do not want it to replace the current file but instead just update the cells of that file to the new values calculated in Access.
Is it possible to do this?
Cheers all
Bikeboardsurf
:confused: :eek: :( :mad: :confused:
:confused: I've created a form within our company database which will track hardware/software requests. I'd like to create a macro, or add code to output the data entered into a notepad file. Nothing extraordinary. I'd like for it to be like this:
Ticket: XXXXX
Employee: xxxxx
Reason for Request: xxxxx
Quantity:xxxxx
Part Number:xxxxx
Price:xxxxx
Shipping:xxxxx
Total:xxxxx
Those are the headings of the fields and x's denote entered data. I'd like to keep the headers and have the entered data as well. Is it possible?
Thanks to all for your help
I have a query that runs based on a parameter a user selects on a form.
I want to dynamically create the sendobject file name based on the parameter the user selects.
Example:
My form has a parameter named medicine. When the user checks the checkbox next to medicine it runs a query for records labeled as medicine but sends the e-mail output as the query name. I want something like medicine.txt etcc...
thanks
:confused:
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.
I have researched on here how to print the results of a query to a text file. I put the code in and I get an error on the openrecordset line. The error says "too few parameters, expected 4"
I tried the query in another report I export to excel and the query works.
I tried printing the whole table using "Select * from tbl_Customers" and it works????
Here is the code:
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("qryBell1", dbOpenSnapshot)
Dim fs, TextFile
Set fs = CreateObject("Scripting.FileSystemObject")
Set TextFile = fs.CreateTextFile(pathname, True)
[Code] ....
the query returns 6 fields for printing and can filter based on whether 3 fields are filled or not on the form - Date, Campaign, Status
Hi,
I'm trying to add a control to my form that I don't know how to do.
On my form, I want the user to be able to click a button which will open up the standard file open dialog box. The user then will be able to browse through the appropriate directory and select an image file which will be saved on that specific record.
Attached is a strip down database as an example.
How can I do this? Any help would be greatly appreciated - I'm trying to do this for my work.
I would like to place an image file located at e.g. "C:MyImagesimage.png" into the clipboard. I have not been able to figure out how to do this. I have been able to place Text into the Clipboard using the DataObject late binding sub below.
Code:
Public Sub PutInClipBoard(strString As String)
Const DATAOBJECT_BINDING As String = "new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}"
With CreateObject(DATAOBJECT_BINDING)
.SetText strString
.PutInClipBoard
End With
End Sub
I am creating a employee db where the pic of the employee is displayed. The pic of the employee is currently stored in a folder using the employee ID as the file name, and the link to the pic file is stored in the employee table. The pic is displayed via an "on current" event of the employee form. I would like to be able to aquire a pic directly from a digital camera into the folder and have it available for the employee display form. I am not sure how to do it as the link to the pic file must be automatically stored in the employee table associating it with the employee info.
At present, I am thinking of capturing the pic from the digital camera into a Temptable in the db and converting the image in the Temptable into a jepg file in the pic folder with the employee id as its file name. If I can do this, I am pretty much home free. Can someone please help. If not the method above, please directly me to another. Thanks
I'm working with Access 2010 and am trying to use the transferspreadsheet command to output data in a query to an Excel 2010 format file. Here is the line of code:
DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12, "q_calldetails_tmp", "c: emp estoutput.xlsx"
It works fine and produces the output file but when I try and open it with Excel I get an error saying the format is incorrect. If I change the extension to .xls it opens with no problem but I need it to be an Excel 2010 format with correct extension.
I need to migrate the contents of a table from Access Jet or Ace to SQL Server.
The table has 2 fields, an integer and a BMP image ex
Field1 Field2
1 BMPimage
2 BMPimage
3 BMPimage
4 BMPimage
If I manage to export the images to files like 1.bmp, 2.bmp, 3.bmp, 4.bmp etc I can then import them into SQL Server.
I am looking for a function that will allow me to encrypt/decrypt single image files as and when required. I have built my own simple one to encrypt a string that will be stored in a filename as all the ones I found created unusable filenames.
However I don't know where to start with the image file encryption.
(Any better way to encrypt a string that can be used in a file name that would be great too. My method is a bit basic).
I'm working on a database which is designed to connect to an app called Canvas (www dot gocanvas dot com). It's for a client which runs a team of heating engineers. All the information regarding the engineer's job is uploaded to Canvas through their API as an XML file, and the engineers use an app on tablet to view the job details. When the engineer goes to their customer and does some work, the completed info (which parts were serviced etc) is then downloaded as an XML file via the API into the database. Also, the customer signs on the engineer's tablet to confirm that the work has been done.
Although the XML files for the job data upload and download fine, there's a different API for getting a download of the JPEG which contains the customer signature, and I'm having real problems finding out how to use this.
The API guide says this:
----
The Submissions API is restricted to authenticated users and requires a username and apassword to access. In addition, the ID field is required. If these fields aren't specified, an error is returned.
The result of this webservice invocation will be either a standard JPEG image or an error code.
Example: [URL] ....
All my code (which I've pasted at the foot of this message seems to work fine. There are no errors, and the ResponseBody object appears to contain a byte stream which would be the jpeg... if only I could get it into a jpeg file!
How I go about taking this "stuff" that's come back in the responsebody and actually create a jpeg image file from it? I feel that I'm so close that I can smell it, but can't get the last step!
Here's the existing code :
Code:
Sub DownloadImageFile()
Dim xhr As Object
Dim webServiceURL As String
Dim actionType As String
Dim PostData As String
Dim strResult As String
[Code] ....
I want to show an subform where in I would like to display images,txt,xlsx that are stored in a directory as icons which when clciked would open the respective files.The info related to the images are stored in t_CustomerFiles.
Record ID, CustomerID, DestinationPath,EventFileName,
1, A, C:UsersTestDesktopCustFiles, CustA1.jpg
2, A, C:UsersTestDesktopCustFiles, CustA2.xlsx
3, B, C:UsersTestDesktopCustFiles, CustB1.txt
4, C, C:UsersTestDesktopCustFiles, CustC1.jpg
5, C, C:UsersTestDesktopCustFiles, CustC2.jpg.
I would like to show them on a continusous sub form .. I am using image control by setting its control source property but it does not seem to work..Do I need something else for the xlsx and txt files..
I'm using Access 2007 SP3.
Whenever I export reports to PDF, the output appears zoomed and clipped. No extra pages are generated as they would be if I'm going over margins, it's just the report is clipped.
The report looks perfect in preview mode, and it looks perfect when going to an actual printer. However, when using OutputTo to save it as a PDF, this is when the report content is clipped.
Here is the code I'm using:
DoCmd.OpenReport MyReport, acViewPreview
DoCmd.OutputTo acOutputReport, "", acFormatPDF, "MyReport.pdf"
DoCmd.Close acReport, MyReport
I open the report in preview mode first so events are fired that show/hide various objects based on fields in the recordset.
I've tried reinstalling, and I've tried this on two different machines, one running Windows 7 and one running Windows Server 2008...both with the same results.
I have a form that I would like to update a picture on using VBA. The source of the picture path is in part a query that is not bound to the form. So far I have the following code that is pretty much working, but with a couple flaws.
Code:
Private Sub Form_Current()
LoadDefaultPicture
End Sub
Sub LoadDefaultPicture()
Dim db As DAO.Database
[Code] ....
This is working. However, when I change the record the picture flashes the current picture once and then loads the new picture. It is like it reloads the current picture then loads the new one. I'm hoping there is a way to get rid of the flash.
Also, the code fails here:
strDefaultPictureName = rs.Fields("AttachmentName")
When the query does not return a record. I can definitely fix this by adding an if statement to check for a record, but I'm kind of perplexed at why it is failing at that line. I would expect it to assign an empty string to that variable name and then fail on the next command where I try and set the ".Picture" property of the image.
Hi all ,
Can anyone tell me about how to embedd image in image control using imagelist.
I added the 5 images in imagelist at design time and added the following code.
image.picture=imagelist.listimages(1).picture
but iam getting error.error no :2110,cannot open the file .
thank u,
Siva
Hi guys,
I'm in desperate need of help and want to know if it is possible to load an image on a form once a hyper link is created.
For example, I have a form with a hyper link to an image created, currently, when you click on the hyperlink, it opens the picture in the browser, can you change it so that it loads teh image embedded into the form instead of loading it into a browser?
If so, how?
Thanks