March 22nd, 2006, 10:36 AM
|
|
Contributing User
|
|
Join Date: Feb 2005
Posts: 110
Time spent in forums: 1 Day 10 h 41 m 54 sec
Reputation Power: 4
|
|
|
IE ActiveX Control for Network File Access
Hello,
We are working on a web based file management system that has actual file access through the network shares when files are clicked.
I've written an activeX control that can send to windows the file location and file name, windows will then open the file from its actual location. When they save the file, the original file is then updated.
The problem I have is, the activex control states it is not digitally signed. Having never done this before, and only needing it to work on our intranet, how can I go about making this file work?
The code I use in the ActiveX, FYI, is:
Code:
Option Explicit
Private Declare Function GetDesktopWindow Lib "user32" () As Long
Private Declare Function ShellExecute Lib "shell32" _
Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Private Const WINDOW_NORMAL As Long = 1
Private Const WINDOW_MAXIMISED As Long = 3
Private Const WINDOW_DEFAULT As Long = 10
Private Const PATH_NOT_FOUND As Long = 2
Public Sub OpenFile(DirName, FileName)
Dim lngReturnVal As Long
lngReturnVal = ShellExecute(0&, "Open", (DirName & FileName), 0&, 0&, WINDOW_NORMAL)
End Sub
Any help, or other ideas would be much appreciated!
Thanks,
Andy
|
ASP Free Forums Sponsor:
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
