Hirdetés
- Xiaomi 13 Pro - szerencsés szám
- Xiaomi 15 Ultra - kamera, telefon
- OnePlus 15 - van plusz energia
- Fotók, videók mobillal
- Motorola Edge 40 - jó bőr
- Xiaomi 14 - párátlanul jó lehetne
- Macrodroid
- Android alkalmazások - szoftver kibeszélő topik
- Xiaomi 13T és 13T Pro - nincs tétlenkedés
- Már az új Sony mobil színeit is megnézhetjük
-
Mobilarena
Ajánlott ingyenes Windows programok 
Androidos kérdéssel irány az Android alkalmazások topik!
Új hozzászólás Aktív témák
-
#9331
lúzer
veterán
kételkedem
#9329
lúzer
veterán
válasz
kételkedem
#9329
üzenetére
de!
![;]](//cdn.rios.hu/dl/s/v1.gif)
-
lúzer
veterán
Hali!
Windows mail típusú levelezőprogit keresek xp alá.
Lényeg hogy külön fájlonként tárolja a leveleket.Webes is jó, ha egy wmail típusú felületen lehet könnyen küldeni, szóval az user ne érezze magát másképp.
Megszokták a winmail/oexpress felületet, ez fontos!Windows Live Mail ilyen lenne egyébként?
-
lúzer
veterán
hmmm swf fájlt nem játszik le az IE
régen nem volt gondomha ezt a minimalista htm fájlt indítom lejátssza az aaa.swf-t:
<html>
<head>
<title>player</title>
</head>
<body bgcolor="#000000">
<div align="center">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" width="800" height="600">
<param name="movie" value="aaa.swf">
</object>
</div>
</body>
</html> -
lúzer
veterán
válasz
jimmy399
#6721
üzenetére
próba:
fájl, megnyitás, exe illetve egy vbs, js fájlt válassz ki a gépedről
ha futtatja kérdés nélkül semmit nem ér de ez MAGÁNVÉLEMÉNY
és bocs ha hülyeségha nincs vbs, akkor ezt egy xxx. vbs fájlba:
set fso=CreateObject("Scripting.Filesystemobject")
set f=fso.Createfolder("C:\qqww0011")ez csinál a c-be egy mappát
-
-
#6014
lúzer
veterán
Core2duo6600
#6007
lúzer
veterán
válasz
Core2duo6600
#6007
üzenetére
gondolom "normális" ember azzal csinálná
én még avi feliratok összefűzését is autocad alól programoztam le -
#6013
lúzer
veterán
Core2duo6600
#6006
lúzer
veterán
válasz
Core2duo6600
#6006
üzenetére
vagy excel...
-
#6002
lúzer
veterán
dr_strange
#5999
lúzer
veterán
válasz
dr_strange
#5999
üzenetére
Pen(cil) and Paper
-
#5261
lúzer
veterán
Core2duo6600
#5260
lúzer
veterán
válasz
Core2duo6600
#5260
üzenetére
ez már egy másik drive
egyébként 76%, de most jó ideje megint ezen motyorog
-
#4534
lúzer
veterán
BigBadPlaYeR
#4533
lúzer
veterán
válasz
BigBadPlaYeR
#4533
üzenetére
trial verzió is töri?
-
lúzer
veterán
és innen ki lehet másolni pl. wordbe
vagy ide│ ├───graf
│ │ ├───bak
│ │ │ └───graf
│ │ ├───classes
│ │ │ ├───graf
│ │ │ └───package cache
│ │ └───src
│ │ └───graf
│ ├───idozit
│ │ ├───bak
│ │ │ └───idozit
│ │ ├───classes
│ │ │ ├───idozit
│ │ │ └───package cachetxt-be is menti, mentés, unicode és jó lesz
-
#4383
lúzer
veterán
daveredline
#4382
lúzer
veterán
válasz
daveredline
#4382
üzenetére
start-keresés
pl. C vinyó a hely keresés: *és rendezed aszerint ahogy akarod
-
#4289
lúzer
veterán
RoyalFlush
#4285
lúzer
veterán
válasz
RoyalFlush
#4285
üzenetére
jó, oké!
-
#4284
lúzer
veterán
RoyalFlush
#4283
lúzer
veterán
válasz
RoyalFlush
#4283
üzenetére
lehet hogy nem epson...
-
lúzer
veterán
válasz
Kazimír
#4269
üzenetére
Itt az 1.05 verzió, békénhagyja a kiterjesztést:
Dim Input, ujnev, fso, f, f1, fc, s,vv
Input = InputBox("meghajtó és mappa?.....","Na!")
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(Input)
Set fc = f.Files
For Each f1 in fc
vv = vv + 1
ujnev = Right( Left(CreateObject("Scripting.FileSystemObject").GetTempName, 8) , 5)
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.MoveFile Input & f1.name , Input & ujnev & f1.name
Next -
lúzer
veterán
válasz
Kazimír
#4269
üzenetére
Tessék, csináltam egyet:
ezt egy vbs fájlba, a mappába CSAK az átnevezendő fájlok kerüljenek, és csak mp3 pl. szóval ne variáld a kiterjesztéseket.
Mikor kéri a mappát, kell a végén a \ karakter tehát pl: F:\001\Dim Input, ujnev, fso, f, f1, fc, s,vv, kiterj
Input = InputBox("meghajtó és mappa?.....","Na!")
kiterj = InputBox("kiterjesztés mi legyen?.....","Na!")
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(Input)
Set fc = f.Files
For Each f1 in fc
vv = vv + 1
'Wscript.Echo f1.name
ujnev = Right( Left(CreateObject("Scripting.FileSystemObject").GetTempName, 8) , 5) & "." & kiterj
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.MoveFile Input & f1.name , Input & ujnev
Next
![;]](http://cdn.rios.hu/dl/s/v1.gif)
Új hozzászólás Aktív témák
Hirdetés
- Szeged és környéke adok-veszek-beszélgetek
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Otthoni időjárás-állomás
- Spórolós topik
- Xiaomi 13 Pro - szerencsés szám
- Nintendo Switch 2
- Milyen monitort vegyek?
- Renault, Dacia topik
- Milyen belső merevlemezt vegyek?
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- The Elder Scrolls Online Imperial Collector s Edition
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- 27% - ASUS ZenDrive U9M optikai meghajtó DVD RW Ezüst
- HIBÁTLAN iPhone 11 64GB White-1 ÉV GARANCIA - Kártyafüggetlen, MS4389, 100% Akksi
- ÁRGARANCIA!Épített KomPhone Ryzen 5 5600X 16/32/64GB RAM RTX 5060 8GB GAMER PC termékbeszámítással
- MacBook Pro 14" 2023 M3 Pro 36GB RAM, 11 core CPU, 14 core GPU, 512GB SSD, Space Black 27% Áfa 0458A
- Új MSI 15 Katana FHD IPS 144Hz i7-13620H 10mag 16GB DDR5 1TB SSD Nvidia RTX 4060 8GB Win11 Garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest