Søg
Avatar billede elprebsi Praktikant
13. maj 2002 - 09:18 Der er 2 kommentarer og
1 løsning

ActiveX (for dummies)

Goddag eksperter,

Jeg har behov for at kunne starte notepad fra et browser-vindue, og havde tænkt mig at bruge en activeX til det. Men hvordan er det lige jeg gør det med VB ?

Og kan jeg aktivere activeX'en fra en almindelig HTML knap (med noget JavaScript) ?

Ekspert-hilsner
ElPrebsi
Avatar billede dk_akj Nybegynder
15. maj 2002 - 07:56 #1
Hej ElPrebsi

Her er et eksempel jeg håber du kan bruge.
Husk at brugere af sit site skal acceptere at downloade og acceptere at installere ocx'en

Her er html'en

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
    <title>Untitled</title>
</head>

<form action="ocxtest.html" name="ocxform" id="ocxform" onSubmit="startnotepad()">

<body>

<object classid="clsid:0443956C-4798-4BB3-8DFF-6D2AB4501C17" name="notepadocx">
<SPAN STYLE="color:red">ActiveX control failed to load!
-- Please check browser security settings.</SPAN>
</object>

</body>


</html>
<input type="submit" name="Start" value="Start">


</form>


<script language="VBScript">
public sub startnotepad()
ocxform.notepadocx.notepad("calc.exe")
End Sub
</script>


'Og her er ocx'en
' følgende skal gemmes som akjnotepad.ctl
VERSION 5.00
Begin VB.UserControl Akjnotepad
  ClientHeight    =  2235
  ClientLeft      =  0
  ClientTop      =  0
  ClientWidth    =  2700
  ScaleHeight    =  2235
  ScaleWidth      =  2700
  Begin VB.Frame Frame1
      Caption        =  "Notepad ocx"
      Height          =  1950
      Left            =  135
      TabIndex        =  0
      Top            =  180
      Width          =  2400
  End
End
Attribute VB_Name = "Akjnotepad"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Option Explicit

Public Function notepad(ByVal path As String)
Dim ls_command, ls_dir, ls_args, ls_exe As String
ls_command = "open"
ls_dir = ""
ls_args = ""
ls_exe = path

ShellExecuteA 0, ls_command, ls_exe, ls_args, ls_dir, 5
End Function


' følgende skal gemmes i et modul der tilknyttes ocx'en
Attribute VB_Name = "Module1"
Option Explicit

Declare Function ShellExecuteA Lib "shell32.dll" ( _
    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


alternativt og nok lettere download VB projektet her:
http://www.swk-surf.dk/downloads/akj/akjnotepad.zip
Avatar billede elprebsi Praktikant
16. maj 2002 - 10:48 #2
dk_akj !

Dit svar kunne ikke være meget mere præcist. Tak for det. Nu kan jeg holde tidlig weekend :->

Stik mig lige et svar, så du kan få dine point !

/ElPrebsi
Avatar billede dk_akj Nybegynder
16. maj 2002 - 10:59 #3
God weekend ;o)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 21:38 webui_forge_cu121_torch231 med AMD Grafikkort. Af jonpet i Andet software
I går 20:06 email adresse Af Malm i Forslag til ændringer
I går 19:54 problem med google crome Af Malm i Andet software
I går 09:36 Alternativ holder til to skærme... Af Don G i Skærme
20/0815:01 Samsung smart TV Af postpeter@outlook.dk i Fri debat
White papers
Flere white papers »