Új hozzászólás Aktív témák
-
Geripapa
aktív tag
válasz
RedHarlow
#1101
üzenetére
@echo offsetlocal enableDelayedExpansionfor /r "%cd%" %%i in (*.*) do (if not %%~nxi == "unc.txt" rm %%~nxi)echo Kész!
pauseendlocal
Eddig jutottam. a "unc.txt" helyére valami más kell de nem tudtam rájönni hogy mi. annyira én sem vagyok penge....De innen talán már meg tudod oldani. -
Geripapa
aktív tag
válasz
Geripapa
#854
üzenetére
Na idáig jutottam:
@echo off
setlocal ENABLEDELAYEDEXPANSION
set z=0
set /a counter=1
for /f %%a in ('dir *.dx /b /s') do (
for /F "tokens=*" %%B in (%%a) do (
if %%B ==100 set /A z=2
if %%B ==102 set /A z=2
if %%B ==280 set /A z=2
if %%B ==281 set /A z=2
if %%B ==330 set /A z=2
if %%B ==331 set /A z=2
if %%B ==340 set /A z=2
if !z! ==0 echo %%B >> %%~na_uj.dxf
if !z! ==1 set /A z=0
if !z! ==2 set /A z=1
)
)
echo Fertig!
pause
exitA problémáim:
-Lassú
-Ha van egy üres sor az eredeti fileban akkor azt nem másolja le mit ha ott sem lett volna....pedig kellene -
Geripapa
aktív tag
válasz
Geripapa
#853
üzenetére
Eddig már eljutottam hogy megtalálom a sort, de nem tudom hogy tudom törölni ezt meg az utánna következöt.
Ill abban sem vagyok biztos hogy ez igy a leggyorsabb mód...
@echo off
setlocal ENABLEDELAYEDEXPANSION
set vidx=0
set /a counter=1
for /f %%a in ('dir *.dxf /b /s') do (
for /F "tokens=*" %%B in (%%a) do (
SET /A vidx=!vidx! + 1
set var!vidx!=%%B
if %%B ==100 echo !vidx! %%B ---------------------------------------------------
)
)
echo Fertig!
pause
exit -
Geripapa
aktív tag
Sziasztok,
szükségem lenne egy olyan kis progira ami végignéz egy textfilet soronként és ha egyik sor értéke pontossan "100" akkor ezt a sort ill a következö sort kitörli majd megy tovább.
Sajne ez a kód nekem kissé magas...
De eddig eljutottam hogy az alábbi kóddal megnyitom az összes fielt ami érdekes de hogyan tovább?@echo off
setlocal ENABLEDELAYEDEXPANSION
set vidx=0
set /a counter=1
for /f %%a in ('dir *.dxf /b /s') do (
)
cls
echo Fertig!
pause
exit -
Geripapa
aktív tag
válasz
Geripapa
#766
üzenetére
Igy oldottam meg

(tudom hogy van benne sok felesleges sor ...)
@echo off
setlocal ENABLEDELAYEDEXPANSION
set vidx=0
set /a counter=1
for /f %%a in ('dir *640R*.mod /b /s') do (
echo !counter! %%~pa %%~na >> spot.txt
set /a counter=!counter!+1
for /F "tokens=*" %%B in (%%a) do (
SET /A vidx=!vidx! + 1
set var!vidx!=%%B
set sor=%%B
set sor2=!sor:~0,19!
IF "!sor2!" == "LOCAL PERS spotdata" (
echo %%B >> spot.txt
)
)
set var
set var4=!var4: = !
set var4=!var4: =!
set vidx=0
)
cls
echo Fertig!
pause
Exit -
Geripapa
aktív tag
Szerettem volna egy kis programot irni ami egy több txt böl kiveszi a lényeget és egybe teszi át.
@echo off
setlocal ENABLEDELAYEDEXPANSION
set vidx=0
set /a counter=1
for /f %%a in ('dir *640R*.mod /b /s') do (
set /a counter=!counter!+1
for /F "tokens=*" %%B in (%%a) do (
SET /A vidx=!vidx! + 1
IF "%B:~0,19%" == "LOCAL PERS spotdata" (
echo %%B >> spot.txt
)
set var!vidx!=%%B
)
)Ez lenne az.
az elgondolás az hogy megkeresi az összes filet megd átnézi a sorokat és ha olyant talál aminek az elsö sora "LOCAL PERS spotdata" akkor azt kiirja egy text fileba...
Mi a gondja ennek?
Mert hogy nem müködik az tuti
-
Geripapa
aktív tag
xcopy-val másolok át egy könyvtár szerkezetet fileokkal. /E kapcsolóval.
De mielőtt elkezdené másolni rákérdez hogy könyvtár e vagy file. itt egy V betűt kell nyomni neki, ez valahogy lehet automatizálni?
-
Geripapa
aktív tag
válasz
Geripapa
#681
üzenetére
Köszi a segitséget, sikerült végül megszülni az eredményt, nem biztos hogy tökéletes, de ahogy teszteltem müködik...
még egy logfilét is csinál
@echo off
setlocal ENABLEDELAYEDEXPANSION
set /a counter=1
for /f %%a in ('dir sysvars.sv /b /s') do (
echo !counter! %%a >> log.txt
set /a counter=!counter!+1
SET _dir=%%~pa
set _drive=%%~da
SET _file=!_drive!!_dir!sysvars.sv
SET _newFile=!_drive!!_dir!sysframe.va
kconvars !_file! !_newFile!
)
endlocal -
Geripapa
aktív tag
válasz
sztanozs
#678
üzenetére
Sajna nálam nem működik!
SET _dir=!_file:~0,-11!
ezzel a sorral lehet valami, mert az nekem nem adott ki semmit.
Ha jól értelemezem akkor ennek a _file változó útvonalát kellene visszaadnia.De ha echoval kiküldöm egy txt be akkor nem ad vissza semmit max annyit hogy az echo off-ba van kapcsolva.
-
Geripapa
aktív tag
válasz
sztanozs
#676
üzenetére
Köszi, a segitséget.
Átirtam az elérési helyet lefutattam de nem csinált semmit. Sajna nem látom át itt hogy mi mit jelent.
Elképzelhetö hogy csak a megadott könyvtárba keres, nem az összes alkönyvtárban?
a .txt azt jelenti hogy txt-ket keres? Azt is átirtam .sv-re de az sem segitett. -
Geripapa
aktív tag
Sziasztok,
van több mint 90 könyvtáram elvileg mindegyikben van egy "sysvars.sv" file.
ezt kellene átkonvertálnom.jelenleg úgy müködik a dolog hogy ezt a filét bemásolom egy könyvtárba ahol van egy "kconvars.exe"
majd inditok egy cmd-t ahol elnavigálok az adott könyvtárba és beirom ezt:"kconvars sysvars.sv sysframe.va"
Ha végzett akkor visszamásolom az eredményt az eredeti mappába majd megnyitom a követezö mappát és folytatódik a az egész elöröl.Gondolom egy hozzáértönek nem egy nagy dolog egy olyan programot irni ami végignézi az összes könyvtárat és ha talál egy "sysvars.sv" filét akkor futatja rajta a konvertálót. Tudna valaki nekem segiteni?
Új hozzászólás Aktív témák
- Milyen TV-t vegyek?
- sziku69: Fűzzük össze a szavakat :)
- Azonnali fáradt gőzös kérdések órája
- Épített vízhűtés (nem kompakt) topic
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Milyen autót vegyek?
- One otthoni szolgáltatások (TV, internet, telefon)
- Le Mans Ultimate
- OLED TV topic
- Napelem
- További aktív témák...
- Vanda GAMER-Pc, ASUS B560m, i5-11400F, 16GB DDR4, 1TB PCIe M.2 SSD, RTX 5050 8GB, 550W 90+, WiFi
- Kingston Fury Beast 2x8GB ddr4 2666mhz KF426C16BBK2
- OHH ! Dell Latitude 9430 Üzleti Profi Prémium Ultrabook 14" -80% i7-1265U 32/1TB IRIS Xe FHD+
- Canon EOS 200D +kit objektív és táska ( 6100 expo )
- Chieftec Eco Series 600W táp eladó!
- ÁRGARANCIA!Épített KomPhone Ryzen 5 7500F 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Vállalom Xianomi Okos kamerák, szoftveres javíttását
- Creative Sound BlasterX G6 7.1 USB külső hangkártya
- Lenovo T495 Ryzen 5 pro 3500U, 16GB RAM, 512GB SSD, jó akku, újszerű állapot, számla, garancia
- Telefon felvásárlás! Samsung Galaxy A15, Samsung Galaxy A25, Samsung Galaxy A35, Samsung Galaxy A55
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


