Modules & VBA :: How To Create Hexadecimal File
Sep 13, 2013
I would like to read a TIFfle to ACCESS, and store its content as hexadecimal like below to further other process..., how can I achieve this change and storage??
0000: 49 49 2A 00 4E 00 00 00 80 3F E0 50 38 24 16 0D
0010: 07 84 42 61 50 B8 64 36 1D 0F 88 44 62 51 38 A4
0020: 56 2D 17 8C 46 63 51 B8 E4 76 3D 1F 90 48 64 52
0030: 39 24 96 4D 18 80 80 00 60 00 00 00 01 00 00 00
0040: 60 00 00 00 01 00 00 00 08 00 08 00 08 00 0F 00
0050: FE 00 04 00 01 00 00 00 00 00 00 00 00 01 03 00
0060: 01 00 00 00 11 00 00 00 01 01 03 00 01 00 00 00
0070: 0F 00 00 00 02 01 03 00 03 00 00 00 48 00 00 00
0080: 03 01 03 00 01 00 00 00 05 00 00 00 06 01 03 00
View Replies
ADVERTISEMENT
Nov 4, 2013
I'm trying to create a button that will open a save window so that user can select where and the name of a new backend file.
and create a new backend file from the one in use and link to the new open.
View 4 Replies
View Related
Jul 5, 2013
I have a spread sheet which on a per line basis contains columns whose cells contain the path to a file. It looks as if many of the files are tif, pdf, word and excel etc, so multiple file types.
Writing a routine which would take each row and then for each line of file paths turn them into one multi-page document - pdf or something?
View 1 Replies
View Related
Apr 7, 2015
What I'd like to do is have an "export button", where the OnClick event, exports a single table into a new accde file. This would allow the end users to zip this file up and send it to me.
Because of all sorts of stupidity, I have no network capability and must send data back and forth via email.
I have digressed to a replication table that needs to be uploaded, once data is entered by the users...
Because the files can get relatively large (for emailing purposes), I am trying to figure out how I can get just one table from them vs. sending the whole application file back to me... It's pretty vital that they not be able to edit the table because that could really mess up the process.
So any way to create a new lock file from within the current Db?
View 1 Replies
View Related
Oct 22, 2014
I have a VBA routine that runs some queries and then creates a report as a PDF document using my virtual PDF printer. At this point it brings up the Save As dialog and I give the file a name and select a folder to store it in.
But I run this report 30 times for 30 different parameters. The parameters are obtained from a table which contains values such as Cancer, Diabetes, Stroke
-I always name the PDF file according to this value.
-I always choose the same folder.
-I always overwrite the reports I produced last month (copies have been sent elsewhere by then).
how can I get VBA to cycle through this code 30 times, each time selecting the next value from my table and creating/overwriting those files without the need for me to tell it the filename and path?
Code:
Private Sub lstSpecialties_DblClick(Cancel As Integer)
At the moment I am running this code by double-clicking an entry in the Specialty listbox, 'but I would prefer the whole thing to run multiple times for as many Specialties as exist in the table '(currently 30 but could be more in time)
'Warnings off
DoCmd.SetWarnings False
'Make the tables needed for the cumulative queries
DoCmd.OpenQuery "Spec 002 Monthly recruits - part 2 - make table" Each of these queries
DoCmd.OpenQuery "Spec 005 Monthly recruits - part 2 - make table" uses the Specialty selected above
DoCmd.OpenQuery "Spec 022 ABF previous year - part 2 - make table" as a parameter to get
DoCmd.OpenQuery "Spec 025 ABF current year - part 2 - make table" the right data for the report
[code]....
View 5 Replies
View Related
Apr 18, 2014
I have a folder which holds 1000s of pictures organised in subfolders, for example:
D:~AI Database Print Scans2009family and
D:~AI Database Print Scans2009holiday
And so forth. In total at the moment 17 main subfolders, each of which hold another 2-3 subfolders.
I am putting together a database to bring pictures together with all sorts of details. I import the picture via hyperlink and complete the various fields. All that works fine but there are a lot of pictures! And it gets confusing to see which ones have already been entered into the database and which ones haven’t.
One solution for this is to copy the pictures that have been “completed” to another folder. I have found a way to do that:
Dim fs As Object
Dim oldPath As String, newPath As String
oldPath = Forms!frmPrintDetails.txtPath1
newPath = "D:~AI Database Print ScansCompleted_Entries"
Set fs = CreateObject("Scripting.FileSystemObject")
fs.CopyFile oldPath, newPath
Set fs = Nothing
Works fine, but the problem is that I loose the subfolder structure, it copies all pictures to the same main folder. I’d like to maintain the subfolder structure and add code to create the correct subfolders and next copy the picture. With the different paths I’m lost. I don’t know how to extract the correct path in code. I’d also like to either rename or remove the picture once I have completed entry of the details. The problem I have again is that I don’t know how to code for a changing path.
View 12 Replies
View Related
Jun 2, 2015
I want to create a Macro saves the report in a specific location, and uses two fields within the report to generate the name of the file. For example, "[Sales Rep Name] + [PayPeriod].pdf" and it should be saved in a predetermined folder.
View 1 Replies
View Related
Oct 24, 2014
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] ....
View 7 Replies
View Related
Sep 9, 2013
I am trying to create some code for a button in a report that will follow a hyperlink to a specific file. The problem I'm having is that the files that are at the end of the hyperlink can have various extensions (*.doc, *.docx, *.pdf, etc.) I'd like to be able to put a wildcard in the code to allow the opening of the file regardless of the extension.
Code so far:
Private Sub Command6_Click()
Application.FollowHyperlink ("C:UsersjbeggDocumentsAccessTestFolder" & [FileName] & ".*")
End Sub
View 11 Replies
View Related
Apr 5, 2012
How to convert Hexadecimal to decimal? I've tried use Val() to get the value but some value is not valid ....
View 5 Replies
View Related
Sep 24, 2013
I have a text column with hexadecimal strings like "4E1B0A65FE3299FE", ie. of length 16.I'm doing an ALTER COLUMN query to convert the column to varbinary, but Access is doing conversion by ASCII, which results in a varbinary field of size 32, I think this is because the text column is in Unicode.
SQL Server has something called "styles" which are used with CONVERT.where you can choose to convert by two characters at a time 2:1..How do I do the same in an Access query? CONVERT/CAST are no supported.
View 1 Replies
View Related
Jul 4, 2005
I use office 2003, first I had to convert my database, then I did the database splitting then, remove all menus from running at startup, I tried to create an mde file but it didnt work.
This is what I got:
This error is usually associated with compiling a large database into an MDE file. Due to the method used to compile the database, a considerable number of TableID references are created for each table. The Microsoft Jet database engine version 4.0 can only create a maximum of 2048 open TableIDs at one time. Exporting a database as an MDE potentially can exceed this limit if the database has a large number of objects (table, macro, form, report, etc).
There is no accurate method to estimate the number of TableIDs the Jet database engine uses during the process of compiling a database as an MDE. However, each VBA module and each form uses one TableID, as a result, if the database has 500 forms, and each form's HasModule property is set to Yes, as many as 1,000 TableIDs are used.
So installed office XP and tried the same steps but still not working.
View 1 Replies
View Related
Aug 14, 2015
Question: Is it possible, using VBA, to determine the actual Excel file type without opening the file?
I receive data files from other departments. Seems like every time someone changes their download structure, I end up with file types that do not match the download extension (example: xlm file with a xls extension). The files can't even be opened because of this. I think I can fix it if I could figure out how to determine what the file type really is.
I'm using Office 2010.
View 3 Replies
View Related
Oct 4, 2013
I recently upgraded a DB from 2003 to 2013 and ran into the following problem.
I have a button that opens a file dialog box and allows the user to upload a file to a predetermined location (and store the address as a hyperlink). I borrowed this code from someone else on here and modified it slightly.
In any case, the button still works, but now when it opens it doesn't have an option for "All files" under file types. So I can upload MS Office files, text files, etc., but not PDF files which are by far the most common types my users upload.
Here's my code and a screenshot is attached.
Private Sub Command35_Click()
Dim dd As Integer
Dim fileDump As FileDialog
Set fileDump = Application.FileDialog(msoFileDialogOpen)
dd = fileDump.Show
[Code] ....
View 3 Replies
View Related
Jun 20, 2014
I am using the following code to select files using Microsoft Office's file dialog:
Public Function fTestFilePicker() As String
Dim fdFileSelection As Office.FileDialog, lstrFileName As String
Const kInitialFile = "F:TestbedTest.txt"
Set fdFileSelection = Application.FileDialog(msoFileDialogFilePicker)
With fdFileSelection
.AllowMultiSelect = False
[Code] .....
When I execute it, the file picker goes to the right folder but does not highlight the file test.txt even though that file name shows in the File name text box. Is there any way to correct this?
View 7 Replies
View Related
Jan 1, 2006
I am running access 2000 9.0.2720. I wanted to create an MDE file but every time I attempt I get the message 'unable to create an MDE file'. Any advice?
View 1 Replies
View Related
Oct 11, 2004
I am just having a heck of a time, in trying to make a custom help file.
Has anyone had any luck? I sure would like to see a sample database, showing a
custom help file. I just about tried everything, but not to smart about setting one up.
I have tried the wizzard as well. I know where I get hung up is, trying to map the help file,
to the Help ID number.
Any help would be appreceiated
View 6 Replies
View Related
Oct 28, 2004
I was able to create a MDE database from .MDB file (1900 KB) using Access2000 but not on the other database (5000 KB)
I followed the steps (under tool -database utilities- make MDE file), the message box shown " Microsoft Access was unable to create a MDE database"
Is there any limit on the size of the file? What should i do or check?
NaNy
View 4 Replies
View Related
Dec 7, 2005
I have tried to create an MDE file for my database but can't figure out why it will not let me. I can't don't think I am over the limit in open TableIDs. I have 76 Forms and 91 Tables.
I am setup with two databases - the database with the data is on the server. Is there any other alternative that I can do other than putting the mdb file directly on the client. And if not is there a way to stop the mdb file from constantly growing in size.
View 4 Replies
View Related
Jun 11, 2012
How I can create a log file in Access?
This file will record all processing on access file
View 6 Replies
View Related
Sep 28, 2005
Hello,
I would like to know how to create an empty Excel file (from Access) ?
I would like to name the workbook (xxx.xls) name the sheets and give the folder where to store it.
Thanks in advance for help.
VINCENT
View 5 Replies
View Related
Oct 6, 2005
I created a help file in access that lets you have text mesasge up to 1024 chars. Just press F1 key on any control that you have setup to bring up help message.
Does any one see any problems with the way I did this?
Form
Help File: = ""
Help Context ID: = 0
For each control on the form where you would like to have a help message do the following.
Form
Control
Help Context ID: = Set to one of the help index numbers in the help table.
Add KeyDown Event to the control
Private Sub Text0_KeyDown(KeyCode As Integer, Shift As Integer)
'Add this line
KeyCode = DisplayHelp(KeyCode, Me.ActiveControl.HelpContextId)
End Sub
module
Function DisplayHelp(KeyCode As Integer, HelpContextId As Integer) As Integer
Dim dbs As DAO.Database
Dim rstRecords As DAO.Recordset
If KeyCode = VBKeyF1 Then ' 112 = F1
Set dbs = CurrentDb
Set rstRecords = dbs.OpenRecordset("SELECT tlbHelp.Index, tlbHelp.HelpMessage " & _
"FROM tlbHelp WHERE (((tlbHelp.Index)=" & HelpContextId & "));")
With rstRecords
If .RecordCount > 0 Then
Call MsgBox(!HelpMessage, vbInformation, "Help")
End If
End With
DisplayHelp = 0 ' Clear KeyCode
rstRecords.Close
Set dbs = Nothing
Else
DisplayHelp = KeyCode
End If
End Function
Create Table and Fields
Table Name: tlbHelp
Field Name: Index as Number
Field Name: HelpMessage as Memo
Field Name: FieldName as Text
Field Name: FormName as Text
How type in custom number and message for each help message.
View 2 Replies
View Related
Feb 26, 2006
Hi there, we currently have a database that users write to through an excel form. Each time a user sumbits a record to the database we open a connection up with the below code, insert the record and then close it. This creates a ldb file for 1-3 seconds depending on how long it takes.
' OPEN DATABASE CONNECTION
Set dbConn = New ADODB.Connection
dbConn.CursorLocation = adUseClient
dbConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0"
dbConn.Open sConn
' INSERT RECORD THROUGH EXECUTE COMMAND
dbConn.Execute("INSERT INTO.... VALUES....")
' CLOSE CONNECTION
dbConn.Close
Is it possible to open the connection up without an ldb file being created so more than 1 user can insert a record into the database at the same time?
Thanks for your time,
Cheers
Tony
View 6 Replies
View Related
Nov 16, 2004
I have a main filing table and three look up tables (file cabinet, topic, and subtopic). In the three look up tables I have created short codes to identify the name of the field.
I want to create a main filing code that takes the codes from each lookup table and combines it into one field. If the location of the file changed I would need the code to change.
Example file cabinet location Rod 1 is R1, Accounting is AP; file topic Active Jobs is ACTJOB, Bank Transactions is BANKTR; subtopic Northeast Fire Station is NETCFS. For the file for the fire station the code would read R1ACTJOBNETCFS.
The form is set up as a cascading combo.
The only purpose for this field is to allow me to do a mail merge to create labels so that I can re-file folders easier without having to go into the database and look up the locations.
I don't know if I should create the expression in the form or if I should do something in the table field.
Suggestions?
View 1 Replies
View Related
Jun 13, 2007
Is there a relatively easy way to output the results of a query to an XML file?
I have the file writer set up more or less:
Code: Dim intFn As Integer Dim strFilePath As String Dim strOutBuf As String strFilePath = "c: emp est.xml" intFn = FreeFile Open strFilePath For Binary Access Write As #intFn strOutBuf = "<?xml version=" & Chr(34) & "1.0" & Chr(34) & " standalone=" _ & Chr(34) & "yes" & Chr(34) & "?>" & vbCrLf strOutBuf = strOutBuf & "<file>" & vbCrLf 'DO FOR EACH LOOP HERE strOutBuf = strOutBuf & "</file>" Put #intFn, , strOutBuf Close #intFn
If this were a C or JAVA application, I would just write a "for each" statement similar to as follows:
Code:For Each (Row in Query){ strOutBuf = strOutBuf & "<entry>" & vbCrLf For Each (Field in Row){ strOutBuf = strOutBuf & "<" & (Column Name) & ">" & (Value) _ & "</" & (Column Name) + ">" & vbCrLf } strOutBuf = strOutBuf & "</entry>" & vbCrLf}
What commands would I use in Access to get each separate row in a query? And then to get each field in that row? And how about the column names for the XML tags?
Thank you for your help.
View 4 Replies
View Related
Mar 3, 2012
An ancient application I'm working with came with .ini file which looks like an instruction set to create an access database. A sample few lines look like:
TABLE, USER, 13
FIELD,USRID,LONG,2,NODUP,ID,False,0,AUTO
FIELD,USRFNAME,TEXT, 50, NO, , True, 1
TABLE,VISITS,15
FIELD,VISIT,TEXT,12,NODUP, ID,False, 0
and so on.
Is there a way to get Access (2007 in my case) to create a new db by reading from this file? Or do I need to manually enter all this information.
View 1 Replies
View Related