Hirdetés
- Samsung Galaxy A52s 5G - jó S-tehetség
- MIUI / HyperOS topik
- Amazfit Helio Strap – képernyőmentesen
- Samsung Galaxy S25 - végre van kicsi!
- Megtartotta Európában a 7500 mAh-t az Oppo
- iPhone topik
- Samsung Galaxy S23 Ultra - non plus ultra
- Miért fárad gyorsabban az iPhone akku, mint az androidos?
- Xiaomi 15T Pro - a téma nincs lezárva
- Huawei Watch GT 6 és GT 6 Pro duplateszt
Új hozzászólás Aktív témák
-
initio
csendes tag
Sziasztok. Először is tisztelettel köszöntök mindenkit.A segítségeteket kérem, abban amin épp dolgozom.
csináltam, visualstudio 2017-ben egy kis gombokkal ellátott exe-t szerveremhez.
a gombok közül mindegyik kifogástalanul működik, 3-at kivéve:
- WDS ( központi windows telepítési szolgáltatások )
- Szerver manager
- IIS beállító konzol.
A bajom az, hogy akár hogy próbálom ezeket gombokkal életre kelteni a válasza a programnak, a rendszer nem találja a megadott fájlt. próbáltam külön lnk-fájlra hivatkozni, és külön csinálni bat fájlt is, sőt VBS fájl-t ami ablakban kérdez rá külön az indításra. sőt próbáltam kijátszani is, úgy, hogy vbs-t csináltam ami egy másik vbs-t indít el, a vbs-en belül runas, stb.... de a hiba mindig az, hogy " a rendszer nem találja a megadott fájlt "
rejtelmes érdekesség, hogy ha ezeket a fájlokat ( lnk, bat, vbs ) direkt indítom, azonnal indul minden amit szeretnék. a rendszer: Server2016 datacenter.
a program kódja pontosan így néz ki:
Public Class Form1
Private Const FileName As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-RouteAddition.vbs"
Private Const FileName2 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-Ipenable-router-onoff.vbs"
Private Const FileName3 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\server-console.lnk"
Private Const FileName4 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\developemode.lnk"
Private Const FileName5 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\region-launcher.bat"
Private Const FileName6 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-GodModeON.vbs"
Private Const FileName7 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\gephaziko.bat"
Private Const FileName8 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-AF_INET-ovpn-tap-1.vbs"
Private Const FileName9 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-AF_INET-ovpn-tap-2.vbs"
Private Const FileName10 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-AF_INET-ovpn-tap-3.vbs"
Private Const FileName11 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-AF_INET-ovpn-tap-4.vbs"
Private Const FileName12 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-START-AF_INET-ovpn-tap-1.vbs"
Private Const FileName13 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-START-AF_INET-ovpn-tap-2.vbs"
Private Const FileName14 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-START-AF_INET-ovpn-tap-3.vbs"
Private Const FileName15 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-START-AF_INET-ovpn-tap-4.vbs"
Private Const FileName16 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\SI-engine\OVPN_Start_service\start-ovpn-client.bat"
Private Const FileName17 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\nwsh-center.bat"
Private Const FileName18 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\Tartomany.lnk"
Private Const FileName19 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\iis-start.lnk"
Private Const FileName20 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\wds-start.lnk"
Private Const FileName21 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\connections.lnk"
Private Const FileName22 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\kiszolgalokezelo.bat"
Private Const FileName23 As String = "c:\.HSP Reserved\HSP-SYSTEM\HSP-Yadaptron\mnt\external-storage0\servertools\simanoam-base\launcher\servicesmsc.lnk"
Private Const FileName24 As String = ""
Private Const FileName25 As String = ""
Private Const FileName26 As String = ""
Private Const FileName27 As String = ""
Private Const FileName28 As String = ""
Private Const FileName29 As String = ""
Private Const FileName30 As String = ""
Private Const FileName31 As String = ""
Private Const FileName32 As String = ""
Private Const FileName33 As String = ""
Private Const FileName34 As String = ""
Private Const FileName35 As String = ""
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Process.Start(FileName)
End Sub
Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click
Process.Start(FileName2)
End Sub
Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
Process.Start(FileName3)
End Sub
Private Sub Button13_Click(sender As Object, e As EventArgs) Handles Button13.Click
Process.Start(FileName4)
End Sub
Private Sub Button14_Click(sender As Object, e As EventArgs) Handles Button14.Click
Process.Start(FileName5)
End Sub
Private Sub Button15_Click(sender As Object, e As EventArgs) Handles Button15.Click
Process.Start(FileName6)
End Sub
Private Sub Button16_Click(sender As Object, e As EventArgs) Handles Button16.Click
Process.Start(FileName7)
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Process.Start(FileName8)
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
Process.Start(FileName9)
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Process.Start(FileName10)
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
Process.Start(FileName11)
End Sub
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
Process.Start(FileName12)
End Sub
Private Sub Button7_Click(sender As Object, e As EventArgs) Handles Button7.Click
Process.Start(FileName13)
End Sub
Private Sub Button8_Click(sender As Object, e As EventArgs) Handles Button8.Click
Process.Start(FileName14)
End Sub
Private Sub Button9_Click(sender As Object, e As EventArgs) Handles Button9.Click
Process.Start(FileName15)
End Sub
Private Sub Button11_Click(sender As Object, e As EventArgs) Handles Button11.Click
Process.Start(FileName16)
End Sub
Private Sub Button21_Click(sender As Object, e As EventArgs) Handles Button21.Click
Process.Start(FileName21)
End Sub
Private Sub Button19_Click(sender As Object, e As EventArgs) Handles Button19.Click
Process.Start(FileName17)
End Sub
Private Sub Button20_Click(sender As Object, e As EventArgs) Handles Button20.Click
Process.Start(FileName18)
End Sub
Private Sub Button18_Click(sender As Object, e As EventArgs) Handles Button18.Click
Process.Start(FileName19)
End Sub
Private Sub Button17_Click(sender As Object, e As EventArgs) Handles Button17.Click
Process.Start(FileName20)
End Sub
Private Sub Button22_Click(sender As Object, e As EventArgs) Handles Button22.Click
Process.Start(FileName22)
End Sub
Private Sub Button23_Click(sender As Object, e As EventArgs) Handles Button23.Click
Process.Start(FileName23)
End Sub
End Classcsak ez a híja ami gátolja a tovább haladásomat.
kérem aki tudja a hiba okát segítsen.UI: megpróbáltam a " Private Const FileName27 As String = "" "-ban direkt megadni pl ezt:
C:\windows\system32\servermanager.exe
így sem " találja a megadott fájlt"
Eddig leginkább VBS alapon dolgoztam, és csak notepad++ használtam, a c# még új nekem,
sokindenre gondoltam hogy lehet hogy a gépház stb appok mások mint a többi normál win fájlok, és lehet hogy ezért nem látja a fájlt, ha a gomb kéri??
Nagyok hosszú éjszaka áll mögöttem, kérlek szépen segítsetek megoldást találni
Ezer köszönet előre is.
Új hozzászólás Aktív témák
● ha kódot szúrsz be, használd a PROGRAMKÓD formázási funkciót!
- Samsung Galaxy A52s 5G - jó S-tehetség
- Amlogic S905, S912 processzoros készülékek
- Okos Otthon / Smart Home
- Otthoni hálózat és internet megosztás
- 3D nyomtatás
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- SSD kibeszélő
- Path of Exile (ARPG)
- Billentyűzet gondom van
- MIUI / HyperOS topik
- További aktív témák...
- iPhone 15 PRO MAX 256GB natúr titán gyonyörű! KÁRTYAFÜGGETLEN! Akkumlátor 89%! Fulldoboz!
- -ÚJ,2 ÉV GAR- GAMER PC: RYZEN 5 4500-5600X +RX 6600/6700XT +16-64GB DDR4! SZÁMLA! 70 féle ház!
- MacBook Pro 14 (2021) M1 Pro / 16 GB RAM / 512 GB SSD Új topcase, 100% akku
- Yamaha R-N402D sztereó erősítő
- HP ProBook 450 G7, 15,6" FHD IPS, I5-10210U, 8GB DDR4, 256GB SSD, W11, Számla, 1 év garancia ( olvas
- Telefon felvásárlás!! Xiaomi Redmi 9, Xiaomi Redmi 9AT, Xiaomi Redmi 10, Xiaomi Redmi 10 2022
- HIBÁTLAN iPhone 13 mini 128GB Midnight -1 ÉV GARANCIA - Kártyafüggetlen, MS3320, 100% Akksi
- Hibátlan, megkímélt! II Lenovo ThinkPad T540p II i7-4800MQ I GT 730M I 8GB I 240 GB I 15,6" FHD
- Lenovo ThinkPad P15 Gen 2 - i7-11850H 32GB 1000GB Nvidia RTX A4000 8GB 1 év gar.
- DeepCool FK120 Performance Fan 3 Kit
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


