Tablets

Ask something
Question Locked

Storing an InkObject in an Access database

0 helpful
5 replies

by fitec.cheam

Closed to new repliesThis discussion is closed. It stays readable, but it takes no new replies.

I am trying to add an signature field to a form on an existing Access 2003 application. Whilst I can add an InkPicture Object to the form, I am struggling to try and find a method / example of how to save the entered signature either to the db or a separate file (I am sure I am missing something obvious in the VB6 code to save the object).

The application will be developing up to 15 signatures a day. Initial thought are that this will cause bloat which will gradually slow the db and thus am looking at storing the signatures as files external to the db. Is this sensible or is the compression available with Ink sufficient to allow storing Ink images without an impact on db performance.

The db is Access 2003 using VB6 with Win XP Tablet Edition.

Any help with sample code or comments on the proposed method of storage would be appreciated.

5 replies

by biscuit

Did you ever find a solution? I am trying to do the exact same thing.

Thanks in Advance.

by fitec.cheam

I got some useful tips when I posted the same question at IT Toolbox forum - http://database.ittoolbox.com/groups/technical-functional/access-l/storing-an-inkobject-in-an-access-database-1373165.

However have been concentrating on other aspects of the project at the moment as the user could work round not recording the signature for the short term but wanted other features urgently.

If you find any more information or a solution, please keep me up to date as I will be visiting the problem again in the near future.

Good luck in your search.

by stevenprius

I am trying to do exactly the same thing in Access. I have a ink signature I need to insert into each record as data is collected. I get the ink picture inserted into the form but cannot get the ink stored to the table in the database to retrieve with the record.

by zaphod842

This works for an optomology program I wrote in access 2007 should work in 2003
uses inkpicture object from ink set of ocx's

Private Sub Command283_Click()
'CODE to SAVE InkPicture to FILE
Dim objInk As MSINKAUTLib.InkPicture
Dim bytArr() As Byte
Dim File1 As String
File1 = "C:\test.isf"
Set objInk = Me.InkPicture2.Object
If objInk.Ink.Strokes.Count > 0 Then
bytArr = objInk.Ink.Save(2)
Open File1 For Binary As #1
Put #1, , bytArr
Close #1
End If

This discussion is closed to new replies.