/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Kør program !!!
Fra : PeterPirat


Dato : 20-04-01 09:24

Jeg vil lave et menu system der skal kunne starte diverse programmer op når man smider en cd i et drev.
Jeg kan starte et program op vha. :

Private Sub Command1_Click()
Shell "E:\SETUP.EXE", vbNormalFocus
End Sub

Men nu er E jo statisk
Hvordan gør man det dynamisk, dvs den selv finder ud af om det er E, F, G eller.... programmet er startet op fra ??

På forhånd tak...
Erik A

--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"


 
 
Thomas Jørgensen (20-04-2001)
Kommentar
Fra : Thomas Jørgensen


Dato : 20-04-01 20:41

Har selv "bøvlet" lidt med det, men du kan lave en simpel bat fil som
tjekker en bestemt fil på din cd-skive,
derved finder den ud af hvilket drev dit cd-rom er.

F.eks. sådan: (her er det smart.chk - som den leder efter)

Håber du også kan bruge det
MVH
Thomas J.

Rem **************** Tjek af cd-drev******************
@echo off
break=ON
cls
REM *********tjekker for en fil*********************
if exist d:\smart.chk set xdrive=d:\
if exist e:\smart.chk set xdrive=e:\
if exist f:\smart.chk set xdrive=f:\

call %xdrive%install

REM ********installation afsluttet - Thomas J. **********





> Jeg vil lave et menu system der skal kunne starte diverse programmer op
når man smider en cd i et drev.
> Jeg kan starte et program op vha. :
>
> Private Sub Command1_Click()
> Shell "E:\SETUP.EXE", vbNormalFocus
> End Sub
>
> Men nu er E jo statisk
> Hvordan gør man det dynamisk, dvs den selv finder ud af om det er E, F, G
eller.... programmet er startet op fra ??
>
> På forhånd tak...
> Erik A
>
> --
> Leveret af:
> http://www.kandu.dk/
> "Vejen til en hurtig løsning"
>



Thomas J. (20-04-2001)
Kommentar
Fra : Thomas J.


Dato : 20-04-01 21:30

Hej Erik

Hvis din menu ligger på cd´en kan du bruge app.path. Et eksempel:

Private Sub Command1_Click()
Dim myPath$
myPath = App.Path
If Not (Right(myPath, 1) = "\") Then myPath = myPath + "\"
Shell myPath + "apps\setup.exe", vbNormalFocus
End Sub

Med venlig hilsen
Thomas J.

"PeterPirat" <PeterPirat.news@kandu.dk> skrev i en meddelelse
news:pkSD6.49749$o4.4017137@news010.worldonline.dk...
> Jeg vil lave et menu system der skal kunne starte diverse programmer op
når man smider en cd i et drev.
> Jeg kan starte et program op vha. :
>
> Private Sub Command1_Click()
> Shell "E:\SETUP.EXE", vbNormalFocus
> End Sub
>
> Men nu er E jo statisk
> Hvordan gør man det dynamisk, dvs den selv finder ud af om det er E, F, G
eller.... programmet er startet op fra ??
>
> På forhånd tak...
> Erik A
>
> --
> Leveret af:
> http://www.kandu.dk/
> "Vejen til en hurtig løsning"
>



PeterPirat (23-04-2001)
Kommentar
Fra : PeterPirat


Dato : 23-04-01 10:41

Tak for svaret Thomas J..

Hvorfor apps ???
Shell myPath + "apps\setup.exe", vbNormalFocus

Virkede da jeg fjernede det...

Mange tak...
                        

--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"


Thomas J. (23-04-2001)
Kommentar
Fra : Thomas J.


Dato : 23-04-01 22:00

Hej

Det var bare et eksempel

"PeterPirat" <PeterPirat.news@kandu.dk> skrev i en meddelelse
news:4KSE6.54991$o4.4659297@news010.worldonline.dk...
> Tak for svaret Thomas J..
>
> Hvorfor apps ???
> Shell myPath + "apps\setup.exe", vbNormalFocus
>
> Virkede da jeg fjernede det...
>
> Mange tak...
>
>
> --
> Leveret af:
> http://www.kandu.dk/
> "Vejen til en hurtig løsning"
>



Søg
Reklame
Statistik
Spørgsmål : 177501
Tips : 31968
Nyheder : 719565
Indlæg : 6408527
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste