Recent content by kleblanc

  1. K

    DLL Help. VB.net to Access

    The Wrapper dll works fine. I did find the code for the original dll last night. So I am going to try to recompile that code to use in Access. Thank you for the help Banana.
  2. K

    DLL Help. VB.net to Access

    I will try the wrapper aproach tonight.
  3. K

    DLL Help. VB.net to Access

    Can't it be done something like this in a module? Private Declare Function ShowWindow Lib "USER32" _ (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
  4. K

    DLL Help. VB.net to Access

    Here is the dll. I do not have the source code for the DLL.
  5. K

    DLL Help. VB.net to Access

    Here is the Sample in C#. This should help you see what I am asking. Can the Reference OTC_SR_C be used in access?
  6. K

    DLL Help. VB.net to Access

    This is a DLL. I added it as a reference in the sample.
  7. K

    DLL Help. VB.net to Access

    This is not the BEEP Command. It is to Beep a device conected to the Computer. The commands are listed in the Reference OTS_SR_C. Below is the Code in VB.NET: Imports OTS_SR_C Public Class Form1 Dim SRC_Device = New SR_C Private Sub Button2_Click(ByVal sender As System.Object, ByVal...
  8. K

    DLL Help. VB.net to Access

    Attached is a Sample program in VB.net 2005. The sample program performs what I want to happen in Access. Can this DLL be accessed in Access 2003 or higher? If so how do I make the commands in the DLL available in Access? Keith
  9. K

    Automated reports to Acrobat

    Hello, I know it may be over do but here is how I solved a similar problem. Module Code: Option Compare Database Option Explicit Declare Function aht_apiWriteProfileString Lib "kernel32" Alias "WriteProfileStringA" (ByVal strAppName As String, ByVal strKeyName As String, ByVal strValue As...
  10. K

    parse phone numbers

    Thank You very much! I did some mod to the function to suit my needs and it worked great. Thanks again. Public Sub RemoveNonNumerical() Dim intCounter As Integer Dim strText As String Dim RemoveNonNumerical As String strText = Me.Phone For intCounter = 1 To Len(strText) If...
  11. K

    parse phone numbers

    My problem with using an input mask is that most of my data is exported from a client db and sent to me. I don't have control over their system and I don't have the time to be doing find and replace every time I want to import to my db. If I get the data in my system I can run a loop to parse...
  12. K

    parse phone numbers

    I am looking for code that will take the phone number entered in a text box and parse out anything that is not a number and return only the numbers with no spaces. (504) 123-1234 >>to>> 5041231234 Can anyone help?
Back
Top Bottom