Hirdetés
- Telekom mobilszolgáltatások
- Honor Magic6 Pro - kör közepén számok
- Google Pixel topik
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Mobil flották
- Szívós, szép és kitartó az új OnePlus óra
- Samsung Galaxy S25 - végre van kicsi!
- Xiaomi 14T Pro - teljes a család?
- Beköltözik a platformköltözés az iOS-be és az Androidba
- Okosóra és okoskiegészítő topik
Új hozzászólás Aktív témák
-
válasz
chepavel
#2021
üzenetére
Melóhelyen nem megy a skydrive (de a dropbox, se semmi ilyesmi, úgyhogy ez is kb ex-has:
Dim newpassword
'a következő sor helyére kell beírni, hogy hogyan kapod meg a jelszót, pl:
newpassword = wscript.Argument(0)
'newpassword = "akármi"
Dim app: Set app = CreateObject("MFilesAPI.MFilesServerApplication")
Dim auth_user, auth_pwd, auth_domain, auth_host, auth_port
'Itt kell megadni, hogy milyen technikai felhasználónvvel és jelszóval jelentkezel be az alkalmazásba
app.Connect 3, "sysadmnlogin", "sysadmnpassw", , "ncacn_ip_tcp", "localhost", "2266", "Demo Vault", false
Dim vault: Set vault = app.LoginAccountOperations
vault.UpdateLoginPassword "mfilesadmin", newpassword -
válasz
chepavel
#2016
üzenetére
Mivel a dokumentáció nem publikus, és nem találtam hozzá konkrét példát, így csak ex-has:
- meg kell nézned, hogy futtatható-e az alkalmazás belső api-jai külső környezetben (wbscriptből). Általában ez nem elérhető (ilyen pl NetIQ vagy MOM scripting környezete is)
- meg kell nézni, hogy a szkriptnek milyen formában adhatók át a futtatási argumentumok. WScript környezet esetén ez WScript.Arguments(n) függvénnyel, de ha nem fut WScript környezetben, akkor van saját argumentum kezelő az API-ban (ha kezel egyáltalán argumenteket)
- ha mindezzel megvagy, akkor inicializálni kell hozni a megvelelő class-t amiben az általad hivatkozott függvény van és meghívni a megfelelő argumentumokkal.
Mindez egyben kb így néz ki:
1) WScript
Dim sUser = WScript.Arguments(0)
Dim sPasswd = WScript.Arguments(1)
Dim oAPILoginClass
Set oAPILoginClass = CreateObject( "MFilesAPI.MegfelelőLoginManipulálóClass" )
oAPILoginClass.UpdateLoginPassword sUser, sPasswd2) M-Files
Dim oAPIArgumentsClass
Set oAPIArgumentsClass = CreateObject( "MFilesAPI.MegfelelőArgumentBeolvasóClass" )
Dim sUser = oAPIArgumentsClass.Arguments(0)
Dim sPasswd = oAPIArgumentsClass.Arguments(1)
Dim oAPILoginClass
Set oAPILoginClass = CreateObject( "MFilesAPI.MegfelelőLoginManipulálóClass" )
oAPILoginClass.UpdateLoginPassword sUser, sPasswd -
martonx
veterán
válasz
chepavel
#2018
üzenetére
Nem tudom, neked kellene valahogy jobban képbe kerülnöd, illetve tőlük maguktól kérdezni, mivel ez egy kereskedelmi termék, élő szupporttal.
A te képbe kerülésedet arra értem, hogy ami kódrészletet belinkeltél, nem más mint egy függvény deklaráció legelső sora, azaz éppen semmit nem jelent.
Új hozzászólás Aktív témák
- Dell latitude 5420 i5-1145G7/ 16gb ddr4/ 250gb m.2 SSD
- Dell XPS 9350 13.4 /16:10/FHD+1920x1200/Intel Core Ultra 5 GEN2 226V/16GB/512GB SSD/ÚJ
- Számítógép, Laptop, I3-7.gen, 8GB DDR4, 240GB ssd, magyar bill, 15,6"-os Full HD kép, gyári töltő
- Apple Iphone 12 64gb Zöld
- Újszerű ELITE Xbox One Kontroller Series 2
- Bomba ár! HP ProBook 450 G6 - i3-8GEN I 8GB I 128SSD I HDMI I 15,6" FHD I Cam I W10 I Gari!
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB RAM RX 9070 16GB GAMER PC termékbeszámítással
- Kötelező darab a karifa alá! Asus Tuf Lap!
- Bomba ár! Lenovo ThinkPad X270 - i5-6G I 8GB I 256SSD I 12,5" HD I HDMI I Cam I W11 I Garancia!
- Asus Zenbook 13 laptop Oled kijelző!
Állásajánlatok
Cég: ATW Internet Kft.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi