Using Activex controls for capturing video from a webcam or similar. Just looking for a snapshot that I could then forward via email from access.
Ive seen commercial licenses for an activex control. The form Im imagining would have a window showing the live video with a snapshot button where we could store the image as a jpg for example and then generate an email forwarding on the image. It seems possible!
I need to use various activeX controls in MsAccess2003. I downloaded a few activeX controls but I am having a problem with licensing. I registered the controls and the registration succeeded but when I try to add this ActiveX control on a form in MSAccess, I get the message that I don't have the license required to use this ActiveX control and that I should obtain the appropriate licence from the company that provides the licenced OLE object or ActiveX control. Any ideas on how to overcome this problem?
View 3 Replies View RelatedI use the Active X calendar control 10.0 in a number of forms*. The mscal.ocx file is in c:Program FilesMicrosoft OfficeOffice 10.
(*In the calendar's Properties it says it is "MSCAL.Calendar.7", which I think is just MS's way of confusing people.)
After splitting the deploying my app, it appears lots of my users either don't have version 10.0 or it is stored someplace else; for example, in C:WindowsSystem32. Because they don't have the correct version/path, everything crashes.
So, how can I easily determine whether users have the right ActiveX in the correct location?
The Microsoft web site says "To distribute your component as part of a Visual Basic application, you can use Package and Deployment Wizard". I don't have that wizard in my version of Access (2002 SP3 on Windows XP), so that's not an option.
Microsoft also says to "To enter the base address for your component, open the Project Properties dialog box and select the Compile tab. The address is entered in the DLL Base Address box, as an unsigned decimal or hexadecimal integer. The default value is &H11000000 (285,212,672). If you neglect to change this value, your component will conflict with every other in-process component compiled using the default. Staying well away from this address is recommended." It seems to make sense that I put the mscal.ocx in the database's directory on the server to serve as the "base address", but other than that this option scares the heck out of me.
Does someone have any suggestions how to easily ensure users have the right ActiveX version on their computer - and in the correct location? (I'm not a super-coder.)
As always, thanks
Christine
Okay, so I have tried to fix this for three days. When I try to create a button, combo or list box I get the message:
ActiveX Controls Can't Create Object. I have been through Internet Options/Security. I have tried reinstalling, I have tried to look into the registry. I even check Microsoft HELP and Mircosoft website and am getting nowhere. Can anyone please, please help solve this problem because it completely baffles me on how to fix this!!!
Oh yeah, (and now I am angry!!!)
After searching the forums, I've found some information, but not what I need or what works.
I've got everything playing fine, from where people can play a file they choose from a list, but I need to add some advanced controls for Fast Fowarding and such.
Searching google, I've managed to find plenty of VB controls, but none seem to work in VBA. I've set the Media Player references, but when trying:
me.MediaPlayer0.Controls the only option it gives me are Items and Count, not Play, Stop or Pause (or anything similar).
Anyone know how to do the advanced controls?
I wrote a custom ActiveX Control in C#.NET using a guide (Google ".net activex control step by step", first link on CodeProject). The control is compiled as a .dll and registered in Access 2007.
When I place the ActiveX control on a Form or Report, I can call its methods from VBA and see its output just fine.
When I open a Print Preview, only the top left corner of the control is shown, the rest is a blank white box. This does not happen with built-in ActiveX Controls (e.g. Calendar control), which print as they should.
I also tried a basic ActiveX Control build using VC++ (the sample control created by the MFC wizard), and that displays and prints correctly.
I have a MS Access database which has a web browser control incorporated within . I also have a get screen capture program for "excel" which works magnificent. I would like to incorporate these 2 functions into The Access . I would like to use my web browser control located in the access example to zoom into the picture of a house . Then capture that image and save it into access in the best usable format possible ...
View 4 Replies View RelatedI am trying to connect to MS Access from MS word using the following code but getting the above error message:
Code:
Sub GetDataFromDataBase()
'allocate memory for the database object as a whole and for the active record
Dim myDataBase As Database
Dim myActiveRecord As Recordset
[Code] .....
I'm using Access 2003. In "References" (Tools > References > Browse...), I've added in "Microsoft Windows Common Controls 6.0 (SP6)" (c:windowssystem32mscomctl.ocx).
I've then created/inserted an instance of the control "Microsoft ListView Control 6.0 (SP6)" on a Form ("MyForm") and given the listvew control the Name "MyListView".I wanted to decorate MyListView with some custom methods so I've created a new class module ("DecoratedListView") which contains a member field called "lvw".
I want 'lvw' to point/reference to MyListView, but I don't know what reference type to use in its declaration. Importantly, I also want to capture lvw's ColumnClick event.
I've tried:
Code:
Public WithEvents lvw As Object
Public WithEvents lvw As Control
Public WithEvents lvw As MSComctlLib.ListView.2
Public WithEvents lvw As MSComctlLib.ListView
Public WithEvents lvw As CustomControl
and none works when I
Code:
set lvw = Forms!MyForm.MyListView
The first try (Object) doesn't even compile. I get the exception "Expected: identifier"
The second try (Control) doesn't compile either. I get the exception "Object does not source automation events"
The third try (MSComctlLib.ListView.2) doesn't compile and throws the exception "Expected: end of statement"
The fourth try (MSComctlLib.ListView) compiles but fails at runtime with the exception "Type mismatch". Using TYPENAME() on the control returns "CustomControl".
The fifth try (CustomControl) compiles but fails at runtime with the exception "Object or class does not support the set of events".
I can't believe I'm the first person to have tried to capture an ActiveX Control's events in a separate class.
I'm using this control to allow users to select a date as input to a subform. The control is working just fine, but I have a problem, I need to reset the value to today on certain events (for instance a reset button to reset the values back to today). I have tried:
Me!calThru.Today
and
Me.calThru.Value = Date
and
calThru.Value = Date
but with no success.
I am trying to capture a newly arrived mail in outlook with respective subject line. The below code works for me on 2010 outlook but when new mail arrive in outlook 2013 ,Mrthod Items_ItemAdd do not get called.
Code:
Option Explicit
Private WithEvents Items As Outlook.Items
Private Sub Application_Startup()
Dim olApp As Outlook.Application
Dim objNS As Outlook.NameSpace
Set olApp = Outlook.Application
Set objNS = olApp.GetNamespace("MAPI")
' (1) default Inbox
[Code]...
I am using the following code but when i run it produces the following error.
Run-time error '429':
ActiveX component can't create object.
then on debug it highlights the line
Set objOutlook = CreateObject("Outlook.Application")
I have searched online and already tried a suggestion to ensure that mictosoft outlook 14.0 object library is selected in the VBA references.
Code:
Dim objOutlook As Object
Dim objMailItem As Object
Const olMailItem As Integer = 0
Set objOutlook = CreateObject("Outlook.Application")
Set objMailItem = objOutlook.CreateItem(olMailItem)
[Code] ....
Hi
I really need to insert a movie in my database. I have tried inserting a Windows Media Player object in a form, but I dont know how to link it to a movie on my computer. Please help me with this. By the way I'm using DAO, if that helps at all.
Please help me as soon as possible, I'm in a hurry
Thanks in advance
We have an ActiveX grid control, 10Tec iGrid, written in VB6. One of its method, Group, used to group rows, raises the AfterAutoGroupRowCreated event so the developer can adjust the look and contents of every group row created during the automatic process of grouping.
When our ActiveX grid is hosted on an MS Access form and we call the Group method while populating the grid in the form's Open event, the AfterAutoGroupRowCreated event isn't triggered. But this event definitely works as expected in other development environments, and even in MS Access if we call Group from the form's Load event.
Is it a well know issue of MS Access, when any events of ActiveX controls aren't triggered while "executing" the Open event
i have a series of short Avi films( they can be converted to another format is better suggestion) that are basically a tutorial films on how to use my database...
what i want is a form to have a list of these files so the user can choose which one to play the file within Access as a tutorial section...
Can this be done, if so anyone fancy helping me with this one please.
Cheers
Andy
Hi
First let me tell you about my system, these are some of my tables
tblMovie
MovieID,MovieTitle,MovieDate,MovieDescription,Movi eActors,CategoryID,MovieLength,MovieStatus,RatingID,MovieR entCount,MoviePoster
tblItem
ItemID,MovieID,FormatID,ItemCondition
tblSuppliers
SupplierID,SupplierName,SupplierCity,SupplierAddre ssSupplierPhone,SupplierMobile
tblPurchase
PurchaseID,SupplierID,PurchaseDate,PurchaseTimePurchaseCost
tblPurchaseDetails
PurchaseID,ItemID,Quantity,CostPerItem
my question is how can i make an order and then update the item table with the new copies that i ordered
I am trying to add an input mask to my video Field, so that it is always enter correctly. V-1-2015, what I have so >"V-"099-0000, but it is showing spaces if nothing is inputted for the 99 fields, if I add in !>"V-"099-0000 it then removes those spaces since those are optional characters, but then the V is no longer capitalized. How can I correctly have an input mask that keeps the V always capitalized and have mandatory fields and optional fields without spaces. I want it to come out as V-1-2015, or V-11-2015 or V-111-2015.
View 11 Replies View Relatedadding a video in my startup page its like a introduction video.....how to add a video in access.
View 1 Replies View RelatedI'm in the middle of writing a multi-language procedure, and in order to populate the label database I would like to cycle all forms (regardless of whether they're open or closed) and cycle all controls within the forms.
View 3 Replies View RelatedI have a form. I want to move a field and it's label. I need to unhook it from the other fields or I can't.
I found this post on another forum: [URL]
It says, in part, When you create your form, before you do anything else, open it in design view. Right click on the top-most of the stacked controls and choose Layout | Remove on the shortcut menu. All the controls are free to move individually now.
alas, I don't know where the "stacked controls" are or Layout/Remove or any "shortcut menus of any kind". (oh how I long for the simpler days of "ordinary" menus (easily accessible from the keyboard.)
I am trying to set event handlers on multiple controls in code. This works:
Code:
Me.Controls("txtPosition" & Right(CStr(iLoop + 100), 2)).OnClick = "=UpdateTaskList(" & CStr(iLoop) & ")"
This doesn't:
Code:
Me.Controls("txtPostIt" & Right(CStr(iLoop + 100), 2)).OnGotFocus = "=PostItGotFocusHandler2()"
The second gives an error: "The expression you entered has a function that <databasename> can't find.
I suspect it may be a parameter mismatch, but the normal GotFocus event handler does not take any parameters.
I have a bit of code that uses controls on a form to batch add records to the tables. Before the code executes, it needs to do a check to make sure that all of the needed data has been supplied.
Code:
If IsNull(txtDateAdded) Then
MsgBox "Please supply the date that the Label record was created"
Exit Sub
Else
If IsNull(cboRecordCreator) Then
[Code] ....
I'm using a mousemove event to display help text for controls in my form.This works well, but I'd like to display help text when the control is disabled as well (to explain to the user why it's disabled).is there any way to fire a mousemove event when hovering over a disabled control?
View 1 Replies View Relatedi have created a module under module section of my DB My Report Name : "PURCH VB Query"
the code is as follows : (what is want tell you later..)
Code:
Sub Erlick()
DoCmd.SelectObject acReport, "PURCH VB Query", True
'"PURCH VB Query", acViewPreview, "PURCH VB Query"
For i = 1 To 3
DoCmd.PrintOut acPrintAll, , , , i
Next i
'This is for creating Seperate Text Per Copy in RptHeader Preview End Sub
i've placed a TextBox in my report named Text25 to the value :
=+1
properties-->data-->running sum--> Set to OVer all
i've also set a textbox in my report named CpyWord to the value : =IIf([Text25]=1,"Original Buyer Copy", IIf([Text25]=2,"Duplicate File copy",))
Now what is want is Three Copies of Report with Two copies marked seperately as per above IIF statement
As i want Three Copies with each Rpt-header as Different Text
Possible solutions (ba donna no a script) How do i refer to Report's control after Docmd.SelectObj.... if any facility then i can do easily thru the dazzling for next loop How do i increase Report's control Text25's value, if three copies r there I know there are many events in Report
I've stucked over this point. My all App in db is ready
Basically I have a class event that works for all controls on any userform.
Its all working fine but I can't add an event to trap the click or mouse move of the userform itself.
Basically so when the cursor moves away from a control the label clears.
User Form Code
Code:
Option Compare Database
Option Explicit
'Define a collection and initialise the commandbutton event class
Private col As New Collection
Private newCmd As New clsEvents
[Code] .....
And here is the class Module
Code:
Option Compare Database
Option Explicit
'catch the event of Commandbuttons
Private WithEvents C0 As SubForm
'Private WithEvents C1 As CheckBox
[Code] ....
I'm working on a code that checks all blank/null text fields and combo boxes in a form and notifies the user if a field is not filled. The code below works if all fields are required, but I can't use it on forms that have fields that are not really mandatory. I've read somewhere on the net to use tags on the controls i want to skip checking, but that's where i get lost.
Code:
Dim stdResponse As Variant
Dim ctl As Control
' Enumerate Controls collection.
For Each ctl In Me.Controls
' Check to see if control is text box
[Code] .....