Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Zusammenfügen
Autor: jogibär
Datum: 17.04.03 13:54
ich habe folgendes problem. ich muss den pfad den ich aus der anwendung mit hilfe von einem vb skript auslese irgendwie in das vb programm bekommen damit das damit die verknüpfung erstellen kann. kann mir dabei jemand helfen?? [u]vb skript set Elo = CreateObject("LeitzElo.Elo32") Elo.SelectView(1) Set WshShell = CreateObject("WScript.Shell") WshShell.Run ("""C:\Programme\ELO Verknüpfung""") Set Elo=CreateObject("LeitzElo.Elo32") STemp="" id=Elo.GetEntryId(-1) ires=Elo.PrepareObject(id,0,0) STemp=Elo.ObjShort & Elo.GetArcName while ires=2and Elo.ObjMainParent>1 ires=Elo.PrepareObject(Elo.ObjMainParent,0,0) STemp=Elo.GetArcName & Elo.ObjShort & STemp wend [u]vb code Private Sub Command1_Click() Dim Ziel As String Dim Pfad As String Dim Text As String Dim Privat As Boolean Dim Puffer As String * 256 If Option1(0).Value = True Then Ziel = "..\..\Desktop" ElseIf Option1(1).Value = True Then Ziel = ".\Autostart" Else Ziel = "." End If Pfad = GetFullPathName("test.txt", Len(Puffer), Puffer, "") Text = "???" Privat = True If VerknuepfungAnlegenVB6(Ziel, Pfad, Text, Privat) = True Then MsgBox "Verknüpfung wurde erstellt.", 64, Me.Caption Else MsgBox "Verknüpfung konnte nicht erstellt werden.", 16, "Fehler" End If End Sub

Zusammenfügen

2.509

jogibär

17.04.03 13:54

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen