Kære gæst, velkommen til Tweak.dk. Hvis dette er dit første besøg her, bør du læse Hjælp. Her forklares i detaljer hvordan denne side fungerer. For at benytte alle funktionerne på denne side, bør du overveje at lade dig registrere. Benyt venligst registreringsformularen for at registrere her eller læs yderligere information om registreringsprocessen. Hvis du allerede er registreret, så log på her.

1

fredag, 5. juli 2013, 17:51


jeg har lavet dette lille program:




Office 2013 Dansk knappens skal starte exe filen i mappen "\DA-da\setup.exe" og Office 2013 English skal starte exe filen i mappen "\EN-en\setup.exe" men når jeg skrive stien som før el. med * i el. andet virker det ik får bare denne her fejl:




men står hele sti'en der alså com "C:\office\DA-da\setup.exe" så starter det fint nok op, men det hjælper jo ik når jeg vil lave en iso som kan brændes ud...

udover det får jeg denne her fejl fra office setup.exe:



men tror måske det er fordi jeg mangler noget i min Windows 7 ved det ik helt, har haft den til at virke på den gamles bærbar, men får nu bare samme fejl...




2

søndag, 7. juli 2013, 17:09


hmm slet ik nogen som kan hjælpe?




3

søndag, 7. juli 2013, 19:12


Hvordan navigerer du frem til filerne i koden?

i VB kan man pege hen på en fil enten via den fulde sti (fx. @"C:\ditProgram\OfficeDA\isoFil.iso") eller som en relativ sti (@"OfficeDA\isoFil.iso"), så sikkert noget du gør forkert her.

VB 6.0 er nogle år gammelt godt nok, men læs op på fejlhåndtering i VB. Det er altid god skik at lukke alle kald til og fra filer inde i try... catch (VB.net og C#) eller anvende andre metoder til at fange, spore og håndtere fejlen. VB6 har en del fejlhåndteringsmekanismer netop til den slags (eller de kan nemt laves)

Hver eneste klasse/metode/stykke kode der tilgår en fil på et sted hvor der finder en abstraktion (forsimpling) af data sted (alle steder på nær bundkort, cpu, ram og visse udvidelseskort) skal man sørge for at fejlen skal kunne spores nøjagtigt.

et sidste spørgsmål: Kender du at bruge debuggeren? Hvis der går noget som helst galt kan du finde ud af det der igennem

AMD FX 6300
8 GB Crucial DDR3-800
Gigabyte 970A-DS3P
AMD Radeon R9 270X

4

søndag, 7. juli 2013, 19:21


hvis jeg bruger

Kildekode

1
2
3
4
5
6
7
Private Sub Command1_Click()
Shell "C:\Office 2013 DAN-ENG\DA-da\setup.exe"
End Sub

Private Sub Command2_Click()
Shell "C:\Office 2013 DAN-ENG\EN-en\setup.exe"
End Sub


virker det fint nok, men hvis jeg ska ha den ud på en iso fil hjælper det ik den vil søge på C: har prøvet med

Kildekode

1
2
3
4
5
6
7
Private Sub dansk_Click()
Shell "DA-da\setup.exe"
End Sub

Private Sub english_Click()
Shell "EN-en\setup.exe"
End Sub 


og det virker ik




5

fredag, 12. juli 2013, 04:33


Løsningen er ganske simpel og duer tæt på.

Kildekode

1
2
3
4
5
6
7
Private Sub dansk_Click()
Shell "DA-da\setup.exe"
End Sub

Private Sub english_Click()
Shell "EN-en\setup.exe"
End Sub 


det er korrekt at man skal ind igennem VBs shell, men du skal igennem en ShellExecute i stedet og få vb til at finde programmets egen sti (App.Path):

Kildekode

1
2
3
4
5
6
7
Private Sub dansk_Click()
ShellExecute hWnd, "open", App.Path & "\DA-da\setup.exe", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub

Private Sub english_Click()
ShellExecute hWnd, "open", App.Path & "\EN-en\setup.exe", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub



Mere om det her, et voila ;)

AMD FX 6300
8 GB Crucial DDR3-800
Gigabyte 970A-DS3P
AMD Radeon R9 270X

6

fredag, 12. juli 2013, 06:52


Løsningen er ganske simpel og duer tæt på.

Kildekode

1
2
3
4
5
6
7
Private Sub dansk_Click()
Shell "DA-da\setup.exe"
End Sub

Private Sub english_Click()
Shell "EN-en\setup.exe"
End Sub 


det er korrekt at man skal ind igennem VBs shell, men du skal igennem en ShellExecute i stedet og få vb til at finde programmets egen sti (App.Path):

Kildekode

1
2
3
4
5
6
7
Private Sub dansk_Click()
ShellExecute hWnd, "open", App.Path & "\DA-da\setup.exe", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub

Private Sub english_Click()
ShellExecute hWnd, "open", App.Path & "\EN-en\setup.exe", vbNullString, vbNullString, SW_SHOWNORMAL
End Sub



Mere om det her, et voila ;)


Foxx, skiftede faktisk til Visual Basic 2010 Express, det virkede mere let at gå til ^^




Tilsvarende tråde

Nyeste Videoer og Trailers

Indsend nyhed
Har du fundet en fed nyhed så indsend den så alle andre på Tweak.dk kan få glæde af den.