PC+Mobil  /  Entwicklung Weitere Artikel

Smart-Tag-Programmierung

von THOMAS RIESKE , 24.08.2001
PDF PDF | eBook eBook

Beispiel-DLL: ISmartTagAction-Quelltext

Den Quelltext dieser Klasse können Sie hier downloaden.
Code
1
Option Explicit
2
With ie
spacer_1px
Textansicht
Private Property Get ISmartTagAction_VerbCaptionFromID(ByVal VerbID As Long, ByVal ApplicationName As String, ByVal LocaleID As Long) As String

Select Case VerbID
Case 1
ISmartTagAction_VerbCaptionFromID = "MS Word"

Case 2
ISmartTagAction_VerbCaptionFromID = "MS Excel"

Case 3
ISmartTagAction_VerbCaptionFromID = "MS Access"

Case 4
ISmartTagAction_VerbCaptionFromID = "MS Frontpage"

Case 5
ISmartTagAction_VerbCaptionFromID = "MS Outlook"

Case 6
ISmartTagAction_VerbCaptionFromID = "MS Powerpoint"
End Select
End Property

Private Property Get ISmartTagAction_VerbNameFromID(ByVal VerbID As Long) As String

Select Case VerbID

Case 1
ISmartTagAction_VerbNameFromID = "MS Word"
Case 2
ISmartTagAction_VerbNameFromID = "MS Excel"
Case 3
ISmartTagAction_VerbNameFromID = "MS Access"
Case 4
ISmartTagAction_VerbNameFromID = "MS Frontpage"
Case 5
ISmartTagAction_VerbNameFromID = "MS Outlook"
Case 6
ISmartTagAction_VerbNameFromID = "MS Powerpoint"

End Select

End Property


Private Sub ISmartTagAction_InvokeVerb(ByVal VerbID As Long, ByVal ApplicationName As String, ByVal Target As Object, ByVal Properties As SmartTagLib.ISmartTagProperties, ByVal Text As String, ByVal Xml As String)
Dim ie As Variant
Set ie = CreateObject("InternetExplorer.Application")
Vorherige Seite
Seite 11 von 11
 
Inhalt dieses Artikels
Links zum Artikel
Test: Office XP Final Test: Office XP Final
Jetzt steht die fertige Version von Office XP in den Läden. Schöner und smarter soll es sein. Ob das aber ausreicht, die ...

Links zum Thema
Zukunft XML Zukunft XML
Die eXtensible Markup Language, kurz XML, schreitet als Datenaustauschformat der Zukunft voran. Die erweiterbare Auszeichnungssprache ...

> DTD: Regeln für XML-Dokumente

Ihre Meinung zum Artikel
Benutzername:
Passwort:



NEU IM FORUM
NEU IM BLOG