Hirdetés
Új hozzászólás Aktív témák
-
Csontikka
aktív tag
válasz
Geripapa
#855
üzenetére
Szia,
ez batchben lassú lesz, nincs azon a gépen esetleg PowerShell?
Ha igen, akkor kb 1 sor lenne és sokkal gyorsabb:
Get-Content d:\*.xdf | Select-String -pattern "100" -notmatch | Out-File d:\newfile.txt(pl ez. az összes xdf kiterjeszésű filet végig járja soronként és amire nem illeszkedik a '100' minta (tehát nem pont '100'-at tartalmazza a sor), azt beleírja a newfile.txt-be)
Üdv,
Csontikka -
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
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 -
ZohanKAA
csendes tag
válasz
Geripapa
#696
üzenetére
Köszönöm! Így már sikerül megcsinálnom a dolgot, parancsosról
for /d %a in ("%appdata%\Mozilla\Firefox\Profiles\*") do if exist "%a\permissions.sqlite" copy C:\x-profit\permissions.sqlite "%a\permissions.sqlite"
de ha .bat fileban póbálom futtatni:
C:\>beall.bat
\Users\test4\AppData\Roaming\Mozilla\Firefox\Profiles\*") do if exist "\configs
\permissions.sqlite most nem használható.C:\>for /d \Users\test4\AppData\Roaming\Mozilla\Firefox\Profiles\*") do if exist
"\configs\permissions.sqlite "a\permissions.sqlite"C:\>
és nem történik meg a másolás

Mi lehet a probléma?
-
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 -
válasz
Geripapa
#677
üzenetére
bocs, benne maradt egy két dolog a tesztelésből, és nem is írtam, mit csinálj vele
1) _rootfolder után kell a tényleges könyvtár, amiben/alatt alatt az sv fájlok vannak
2) a kconvars.exe könyvtárában kell elhelyezni a fájlt .cmd végződéssel (.bat kerülendő) és onnan futtatniSetlocal EnableDelayedExpansion
@ECHO OFF
SET _rootfolder="C:\Temp"
FOR /F %%A IN ('dir %_rootfolder% /s/b^|find "sysframe.sv"') DO (
SET _file=%%A
SET _dir=!_file:~0,-11!
SET _newFile=!_dir!sysframe.va
kconvars !_file! !_newfile!
)
Új hozzászólás Aktív témák
- Azonnali VGA-s kérdések órája
- Bittorrent topik
- Filmvilág
- A fociról könnyedén, egy baráti társaságban
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- Elemlámpa, zseblámpa
- Candy: Kossuth Lajos azt üzente, elfogyott a gémergépe
- AMD Navi Radeon™ RX 9xxx sorozat
- Everest / AIDA64 topik
- Eredeti játékok OFF topik
- További aktív témák...
- Samsung Galaxy A56 5G 256Gb Dual, 12 hónap Garancia, Fekete Színben, Kártyafüggetlen
- Apple iPhone 15 128Gb, 12 hónap Garancia, Kék Színben, Vodafone / ONE / 70 es
- Sony DSC-RX100 Mark III 3 - nagyon szép állapot
- 2021 Macbook Pro 14, M1 Pro (8 CPU, 14 GPU), 32GB, 1TB, Silver
- I5 9400 Komplett gép MSI Rx570 8gb, G.Skill Ripjaws,Corsair Hydro H45
- 204 - Lenovo Legion Slim 5 (14APH8) - AMD Ryzen 7 7840HS, RTX 4060 (ELKELT)
- Samsung Galaxy S20 Ultra / 12/128GB / Kártyafüggetlen / 12Hó Garancia
- Samsung Galaxy S10+ / 8/128GB / Kártyafüggetlen / 12Hó Garancia
- Dell Vostro 3425 6magos Ryzen 5 5625U 8GB RAM 256GB SSD
- Apple iPhone 15 Pro 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: Laptopműhely Bt.
Város: Budapest




