View .tif with MODI

MS Office Access

    Sponsored Links


  • 1. Command Button and User Level
    It sure is! Here is an example of the code you will need (put in the forms OnOpen event): Private Sub Form_Open(Cancel As Integer) ' Hide buttons based on user type. If faq_IsUserInGroup("Managers", CurrentUser) Then Me.New_C_I.Enabled = False Me.Undo_company_and_industry_info.Enabled = False Me.Save_C_I_info.Enabled = False Me.Duplicate_News.Enabled = False Me.Delete_News.Enabled = False Me.Outstanding_Reports.Enabled = False Me.Word_Document.Enabled = False End If If faq_IsUserInGroup("Inputs", CurrentUser) Then Me.Delete_News.Enabled = False End If End Sub Hope this helps!
  • 2. Databse Move to another Drive
    You have to relink their version of the frontend to point to their version of the BE. Tools - Database Utilities - Linked Table Manager - select all, click the "ask for new location" check box and then OK Now remember if you supply them with a new front end then that relink process will have to done again if you are using your version to update the FE with. Ron
  • 3. SetFocus not being executed
    The place to check this would be Before Update. Also, while I believe IsNull ... =False will work, it may be tidier to use If Not IsNull. Before Update may look something like this: Private Sub BrokerInvNum_BeforeUpdate(Cancel As Integer) If Not IsNull(Me.BrokerInvNum) Then MsgBox "Hey! You've used that invoice number before!" Me.BrokerInvNum.Undo Cancel = True End If End Sub Add error handling as you have done, and be sure the fields and the controls don't have the same name. The example above assumes that BrokerInvNumber is the text box. I'm not exactly sure what will happen if it is the name of the field also, but Undo may not work. "Ricter" < XXXX@XXXXX.COM > wrote in message news: XXXX@XXXXX.COM ... > In the following event code, the SetFocus command is not being executed, > anyone know why? > > Private Sub BrokerInvNum_AfterUpdate() > > On Error GoTo BrokerInvNum_AfterUpdate_Err > > If IsNull(DLookup("ShipmentID", "tblShipments", "BrokerInvNum = '" & > Me.BrokerInvNum & "'")) = False Then > MsgBox "Hey! You've used that invoice number before!", vbOKOnly, > "Invoice Number Checker" > Me!BrokerInvNum.SetFocus > End If > BrokerInvNum_AfterUpdate_Exit: > Exit Sub > BrokerInvNum_AfterUpdate_Err: > MsgBox Error$ > Resume BrokerInvNum_AfterUpdate_Exit > > End Sub
  • 4. homework question
    You don't really think we are just going to give you the answer? Have you tried using the help files to see what the valid entries are in that field and what each one does? Have you tried making the various entries and running the query to see the results? Have you read back through previous class notes or text books? We would be happy to HELP you or point you in the right direction, but blatant cheating will probably not be rewarded in this newsgroup. -- Rick B "joneillrcpa" < XXXX@XXXXX.COM > wrote in message news: XXXX@XXXXX.COM ... > to determine how many clients are assigned to trainer 42, select _____ as > the > entry in the total row for the client number column,select Where as the > entry > in the total row for the trainer number column, and enter 42 in the > criteria > row for the trainer feild. > i > need to fill in the blank and im
  • 5. open query through combo box
    John Try DoCmd.OpenQuery Me!cbSelectQuery, acViewNormal, acReadOnly HTH Steve

View .tif with MODI

Postby bHVjeWs » Sun, 02 Sep 2007 04:30:03 GMT

How can I view a .tif file using the Microsoft Office Document Imaging 
control? Does anyone have example code? 

Re: View .tif with MODI

Postby Stephen Lebans » Sun, 02 Sep 2007 05:49:56 GMT

Do a GoogleGroups search on:
lebans MODI

Several of the threads point to sample source code you can download.


Stephen Lebans
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.

Re: View .tif with MODI

Postby bHVjeWs » Wed, 05 Sep 2007 23:48:02 GMT

I still cannot get it to work.  Following is the code.  The image will not 

  Dim miDoc As MODI.document
  Dim myViewer As New MODI.MiDocView
  Set miDoc = New MODI.document
  Set myViewer = New MODI.MiDocView
  'open existing document
  miDoc.Create "C:\print\myfile.tif"
  'attach document to viewer
  myViewer.FileName = "C:\print\myfile.tif"

  Set miDoc = Nothing
  Set myViewer = Nothing


Similar Threads:

1.Using MODI to convert multi-page tif to single page tif

I have thousands of multipage tif images in many subdirectories that I need 
to convert into single page tifs.  I have vba code to do this (written in MS 
Access) that loops thru the directory tree and I can access info about the 
tifs using MODI.  What I'm looking to do now is convert/save the existing 
multiple page tif to a series of single page tifs so they can be imported 
into our image repository.  Anyone know how to do this?  For example, if the 
current multiple page tif is six pages is would create six single page tifs 
(e.g. sample1_page1.tif,sample1_page2.tif,...


2.MODI - tif file stays locked after .Close

I'm using a MODI reference in my VB .Net 2003 project, creating an MODI 
document object instance and using the .Create("myfilename.tif") method to 
load the document with a single image from a tiff file. After OCRing the 
text, I call the close method.
Problem is that MODI doesnt appear to release the file lock until the 
application closes, and i need to reuse the file name.

dim myMODI as MODI.Document
myMODI = New MODI.Document
{ does some work looking at the words in the myMODI.Images(0).Layout.Text 
property }
myMODI = nothing
Kill ("c:\testfile.tif") 

The kill statement fails saying that another program has the file open.
How can i get MODI to let go of the file?

Any help is appreciated.

3.MODI v12 can't open a .tif file that v11 can open without difficulty

When attempting to open a .tif file with MODI 12.0.4518.1014 I get the error 
"the selected file is not a valid microsoft office document imaging file". 
Opening this file on any machine with MODI 11.something works fine.  Is 
there a patch/fix/workaround for this?

4.Universal view of MODI files

Which PC's can view MODI (Microsoft Office Document Imaging) files (extension 

We have Office 2003 on a WinXP PC.  I wish to publish/distribute 
non-editable views, and might print PDF files (spin wheels eliminating page 
truncate in free/$20 PDF995 or spend $300 on Adobe Acrobat 7.0 Standard).

Or can everybody with a WinXP PC view/print the MODI files?  Or only if they 
have Office 2003?


-- GeneM
Knowledge Spunge (need spill-checker)

5.Viewing Tif files

6. Tif images created from MS Document writer cannot be viewed

7. Viewing tif and mdi files on Pocket PC 2003

8. How to view TIF on Access form?

Return to MS Office Access


Who is online

Users browsing this forum: No registered users and 68 guest