Új hozzászólás Aktív témák
-
új kérdező
csendes tag
Üdv mindenkinek!
Két kérésem, kérdésem lenne. Az első
fnev9k = fnev + "k"
fnev9j = fnev + "j"
fnev9i = fnev + "i"
fnev9h = fnev + "h"
fnev9g = fnev + "g"
fnev9f = fnev + "f"
fnev9e = fnev + "e"
fnev9d = fnev + "d"
fnev9c = fnev + "c"
fnev9b = fnev + "b"
fnev9a = fnev + "a"
If Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9k & ".dxf") <> "" Then
fnev = fnev9k
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9j & ".dxf") <> "" Then
fnev = fnev9j
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9i & ".dxf") <> "" Then
fnev = fnev9i
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9h & ".dxf") <> "" Then
fnev = fnev9h
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9g & ".dxf") <> "" Then
fnev = fnev9g
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9f & ".dxf") <> "" Then
fnev = fnev9f
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9e & ".dxf") <> "" Then
fnev = fnev9e
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9d & ".dxf") <> "" Then
fnev = fnev9d
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9c & ".dxf") <> "" Then
fnev = fnev9c
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9b & ".dxf") <> "" Then
fnev = fnev9b
ElseIf Dir("l:\sw2010rajz\dxf-k szöveghez\" & fnev9a & ".dxf") <> "" Then
fnev = fnev9a
Ezt a belinkelt részt, lehet e kevesebb sorral egyszerűbben megoldani, gondolok itt tömbre meg ciklusra például. A betűk indexeket jelölnek. Ez a programrész, arról szól, hogy van e az adott helyen indexes fájl és amilyent talál azzal folytatódik a feladat. Fontos a sorrend azaz, hogy előbb találja meg pl a b indexűt, mint az a indexűt és persze csak a b-s a jó. Azaz a legmagasabb indexűt keresse az legyen az eredmény.
Másik gond. Részben kapcsolódik az előzőhöz csak itt az alap amihez az indexet kapcsolni kell kötőjelet tartalmaz. Pl: 12345-1 Ebből kellene ezt csinálni: 12345a-1 Itt az első feltétel, azt eldönteni, hogy kötőjeles vagy nem a kiinduló név, ezután megtalálni a kötőjelet és elé beszúrni az indexet. Annyi, ha ez segít, hogy a kötőjel előtti számok(karakterek) 4-5 lehet, a kötőjel utáni a kötőjellel együtt 2-4 karakter lehet.
Ennyi. Előre is köszönöm a válaszokat.
Új hozzászólás Aktív témák
- Playstation 5 lemezes,5 honapos,19 ho garanciával
- MSI H61M-P31/W8 LGA 1155 alaplap
- Teljesen új ASUS ZenBook UX325EA-KG666W (Intel i5 1135G7) laptop eladó (bontatlan+garanciás)
- Új, bontatlan Samsung S24+ 256 GB black
- Dell Latitude E7270, 12,5" HD Kijelző, i5-6300U CPU, 8GB DDR4, 256GB SSD, W10, Számla, Garancia
- 2023 MacBook Air M2 13.6 ÚJ 1 év garancia
- iPhone 13 mini 128GB Midnight / Fekete - Független
- RETRÓ 775 / GIGA P43 - Q9650 (4 3GHZ)!! -4GB - HD5770 1GB (Batmobile) -320GB WD BLACK -400W + CMK350
- Yenkee KATANA Mechanikus (Blue Switch) USB RGB Gaming Billentyűzet
- Sony Playstation 5 PS5 825GB játékkonzol