Új hozzászólás Aktív témák
-
Petya25
őstag
MS Access VB-ben kéne némi segítség.
Úgy kéne egy képet megnyitnom, hogy a pontos nevét nem tudom.
A fájlok nevében van a kép neve + egy növekvő sorszám (amit előre nem tudok) + .jpg
Minden kép egyedi, tehát csak egy fájlt ad vissza ha keresném csillaggal: kep_neve*.jpg
De ezt így simán nem eszi meg a VB, nem ad vissza képet.
A csillaggal elérhető fájl pontos nevét kéne valahogy visszakapnom, azt már tudom használni.
A sorszám nélküli verzióban fájlnév keresés nélkül is simán működik pontos névre.
Ezzel próbálkozok:Dim kep_nev As String
Dim filename As String
Dim url As Stringkep_nev = "a kívülről megkapott kép neve sorszám és jpg nélkül"
filename = My.Computer.FileSystem.GetFiles("\\gep\Images\",
FileIO.SearchOption.SearchTopLevelOnly, kep_nev & "*.jpg")url = "\\gep\Images\" & filename
Shell "explorer.exe " & url, vbMaximizedFocus
Új hozzászólás Aktív témák
- Dell Vostro 5459 egyszerűbb játékokhoz (i5, 4 GB VGA, 250 SSD) ! AkciÓÓ!
- Team Group 32GB DDR4 3200MHz TED432G3200C22BK
- Beyerdynamic Dt 1770 Pro 250 ohm fejhallgató eladó
- Kingston 32GB DDR4 3200MHz KSM32ED8/32ME ECC Szerver RAM
- ELADÓ: ASUS MAXIMUS VII Ranger LGA1150 alaplap - ritka, gyűjtői darab (+gari/számlás)
- BESZÁMÍTÁS! ASRock B760 i5 14600KF 32GB DDR5 500GB SSD RX 9070 16GB be quiet! Pure Base 500DX 750W
- LG UltraGear 38GN950P-B Monitor! 38" 3840x1600 / 1ms / 160Hz / G-Sync / FreeSync! BeszámítOK
- Akció!!! Sosemhasznált! HP OmniBook 5 i5-1334U 16GB 1TB 16" FHD+ Gar.: 1 év
- REFURBISHED - DELL Thunderbolt Dock WD19TB (210-ARJD), WD19TBS (210-AZBV)
- Lenovo Thinkpad E595 Ryzen 5 3500U, Radeon Vega 8, 8-16GB RAM, SSD, jó akku, számla, gar
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
