Hirdetés
- Samsung Galaxy A57 - kecses test, lusta lélek
- Megérkezett Európába a Soundcore Space 2 fejhallgató
- Hivatalos a OnePlus Watch 4
- Így spórolhat az Apple az iPhone 18 kijelzőin
- OnePlus 15 - van plusz energia
- Fittyet hány a pesti napfényre a Honor 600
- Mobil flották
- iOS alkalmazások
- Microsoft Rewards
- Milyen okostelefont vegyek?
Új hozzászólás Aktív témák
-
#2052
Gabás
addikt
WhiteWalker
#2051
Gabás
addikt
válasz
WhiteWalker
#2051
üzenetére
Nem megtévesztő, mert mindenhol ki van írva, hogy csak vezetékesre érvényes. Azt, hogy megéri-e, mindenkinek magának kell eldöntenie.
-
#2050
Gabás
addikt
WhiteWalker
#2049
Gabás
addikt
válasz
WhiteWalker
#2049
üzenetére
csak a vezetékesre vonatkozik a korlátlanság
-
#1977
Gabás
addikt
HoryThePooh
#1976
Gabás
addikt
válasz
HoryThePooh
#1976
üzenetére
-
#1932
Gabás
addikt
rockeramazon
#1931
Gabás
addikt
válasz
rockeramazon
#1931
üzenetére
Öö, miért kellene minden más gépen más Skype-fiókot használni?
Ha nem jelzi, hogy a másik fél elérhető, attól még ő ott lehet, és hívni is tudod, a jelzés néha hibás. -
Gabás
addikt
válasz
Dictator^
#1899
üzenetére
beszélgetés közben a sávokra kattintva lehet állítani a hangerőt
havri1: sajnos a régebbi verzióknál is elindult ez a felbukkanó cucc, megszívtam én is, remélem, minél előbb javítják (elég sokan kérik)
csferke: ezt jelenleg csak úgy lehet, hogy blokkolod a frissítési kiszolgáló IP címét: 204.9.163.158
-
#1352
Gabás
addikt
Sk8erPeter
#1351
Gabás
addikt
válasz
Sk8erPeter
#1351
üzenetére
á, ne törd magad, íme egy egyszerű vbs script, txt-be ment, a célnak megfelel:
uh, egy kicsit összefolyt, ha nem tudod kibogozni, szólj, feltöltöm külön
' Define global variables
Dim oFSO, chat_file, folder_to_save
' Directory where You want to save history (you can modify it)
' Now it is relative, so it will be created where Your *.vbs script runs
folder_to_save = "SkypeChatHistory"
line_count = 0
' Create FSO
Set oFSO = CreateObject("Scripting.FileSystemObject")
set_next_free_dir()
' Connect to Skype API via COM
Set oSkype = WScript.CreateObject("Skype4COM.Skype", "Skype_")
' Open skype, if it is not running
If Not oSkype.Client.IsRunning Then
oSkype.Client.Start()
End If
WScript.Echo "Skype history will be saved. Found " & oSkype.Chats.Count & " chat
group."
' Iterate chats
For Each oChat In oSkype.Chats
names = ""
' First name is You, so it is unnecessary to keep
no_1st_flag = TRUE
For Each oUser In oChat.Members
If no_1st_flag Then
no_1st_flag = FALSE
Else
names = names & "_" & oUser.FullName
End If
Next
get_file("chat" & names & ".txt")
chat_file.WriteLine(vbNewLine & "==== CHAT HYSTORY (" & Replace(names, "_", "")
& ") ====" & vbNewLine)
line_count = line_count + oChat.Messages.Count
For Each oMsg In oChat.Messages
' Fix by Vadim Kravchenko
On Error Resume Next
chat_file.WriteLine(oMsg.FromDisplayName & " (" & oMsg.Timestamp & "): " &
oMsg.Body)
Next
chat_file.Close
Next
WScript.Echo "Backup was finished (" & line_count & " line saved). You can find
your chats in: ./" & folder_to_save
' Garbage collection
SET chat_file = NOTHING
SET folder_to_save = NOTHING
SET oFSO = NOTHING
SET oSkype = NOTHING
' Access to a file given by name
Sub get_file(file_name)
' Parameter fix by: rommeech
Set chat_file = oFSO.OpenTextFile(folder_to_save & "/" & file_name, 8, True, -1)
End Sub
' Find an appropriate directory the logs to save, however, to avoid collision
with former dirs
Sub set_next_free_dir()
If oFSO.FolderExists(folder_to_save) Then
ext = 1
While oFSO.FolderExists(folder_to_save & "_" & ext) And ext < 100
ext = ext + 1
Wend
folder_to_save = folder_to_save & "_" & ext
End If
oFSO.CreateFolder(folder_to_save)
End Sub -
#1350
Gabás
addikt
Sk8erPeter
#1349
Gabás
addikt
válasz
Sk8erPeter
#1349
üzenetére
hát rendes html fájl volt, amikor én használtam, de rég volt
ha mented azt a könyvtárat, akkor elég, viszont a kompatibilitási problémákat nem tudom, de kicsit gyanús, hogy ez a kapcsoló már nem működik. -
#1348
Gabás
addikt
Sk8erPeter
#1347
Gabás
addikt
válasz
Sk8erPeter
#1347
üzenetére
a beszélgetések nem vesznek el. A biztonság kedvéért másolatot készíthesz a (win7 esetében) c:\Users\felhasználónév\AppData\Roaming\Skype mappáról.
-
#1346
Gabás
addikt
Sk8erPeter
#1345
Gabás
addikt
válasz
Sk8erPeter
#1345
üzenetére
azt hiszem, a legújabb verzióban nem működik, esetleg próbálj visszatérni egy régebbire
alternatíva: fizetős app (ingyenes trial esetleg, ha csak egyszer köll)
-
#980
Gabás
addikt
Freddy TNT
#979
Gabás
addikt
válasz
Freddy TNT
#979
üzenetére
ezek nem a havi előfizetés tarifái, hanem a "pay as you go" szolgáltatáséi
Új hozzászólás Aktív témák
Hirdetés
- The Elder Scrolls Online Imperial Collector s Edition
- PC Szervizeket, Gépépítőket keresek B2B szoftver partnerségre (E-számlával)
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Microsoft és egyéb dobozos és OEM szoftverek
- Shining3D EinScan Pro 2X 3D szkenner
- Eladó Dell Latitude 7440 Új állapotban i7-1365U 32 GB DDR5 RAM 1TB SSD Dell pro support garancia
- Apple iPhone 16 Plus 128GB Ultramarine használt, karcmentes 96% akku (266 ciklus) 6 hónap gar
- Samsung Galaxy S23 256GB,Újszerű,Adatkabel,12 hónap garanciával
- Frissen pasztázva! Playstation 4 Pro 1 TB + kontroller 6 hó garancia, számlával!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest