A google gryzie? https://forums.tomshardware.com/threads/... Idea from from (Russian language in orginal): http://fspider.ru/modules.php?name=News&... While on every Windows Start u see something like this C:\Users\%Username%\AppData\Local\Temp\*... lost , where %Username% - your WIndows...
Uruchamiasz program wpisujesz login i hasło wybierasz telefon do odblokowania zaznaczasz direct unlock odznaczasz ripar erom i wybierasz no certyfikate change. Jak się nie pomyliłem to tak powinieneś usunąć simlocka ale nie jestem pewien bo tego programu jeszcze do tego celu nie używałem. Masz opis po angielsku. Ultimate Unlocker is an application for...
Tak ja mam update poszło bez problemu.A tu nasz co napisał sam Laser odnośnie błędu auth #0 err: 6882. so, short summary: all those, who had non activated card and experienced "request denied" error, just repeat operation, all will be fine. all those, who successfully updated, but when trying to activate LGTool receive "LG application not found", please...
Kliknij prawym klawiszem myszki na zakładce arkusza, wybierz Wyświetl kod i w Edytorze VBA wklej Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 3 Then Target.Offset(0, 1) = Application.UserName End If End Sub Co robi to makro? Po każdej zmianie jaka następuje w kolumnie C (Target.Column = 3) wstawia w kolumnę...
Witam, mam starego SETool Box 3 i mam problem z aktywacją karty SmartCard, aby aktywować ją, by kupić LGTool'a. SETool działa normalnie. Log z kliknięcia na przycisk "Activate LG" : setool2 SmartCard updater [0.95] server read: "srv01.dontexist.com" username read: "updater" Please click on reader with setool2 SmartCard. Ready to work LG application...
Co do tej pory zrobiłeś? [syntax=vbscript]Private Sub Workbook_Open() Sheets(1).Range("A1") = Application.UserName End Sub [/syntax]
Wypróbuj takie makro: [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column >= 2 And Target.Column <= 12 Then Cells(Target.Row, "M") = Application.UserName Cells(Target.Row, "N") = Date End If End Sub[/syntax]
W takim razie przy zamknięciu chowamy[syntax=vb]Private Sub Workbook_BeforeClose(Cancel As Boolean) With Sheets(1) .Unprotect Password:="123" For i = 7 To 9 .Columns(i).Hidden = True Next .Protect Password:="123" End With End Sub Private Sub Workbook_Open() With Sheets(1) .Unprotect Password:="123" If Application.UserName = "Jan-Nowak" Or Application.UserName...
Office dobrze działa.:) [syntax=vbscript]Sub Sayhello() Msg = "Czy nazywasz się " & Application.UserName & "?" Ans = MsgBox(Msg, vbYesNo) If Ans = vbYes Then MsgBox "Jestem Jasnowidzem!" Else MsgBox "Nic się nie stało" End If End Sub [/syntax] Tak jest czytelniej.
Dawno temu wchodziło się przez jabłko+S do makowego linuksa w czasie startu. Potem wpisywało się kilka komend i nowe hasło dwa razy, w zależności od wersji systemu jawnie lub w ciemno (nie było widać wpisywanych znaków ale się wpisywały), enter i system startował do ekranu gdzie można było podać nowe hasło. Można było zrobić taki reset tylko raz. Ciekawe...
Można umieścić kod w ThisWorkbook przy zdarzeniu Open. Żeby zabezpieczyć plik przed otwarciem bez makr można ustawić na kluczowe arkusze atrybut VeryHidden (z poziomu edytora VB) a widoczny zostawić dodatkowy pusty arkusz. Przy starcie jeśli warunki są spełnione wystarczy zamienić atrybuty. Tu konieczne hasło ochrony VBA. Przy zamknięciu ustawić na...
To zdaje się, że najlepiej będzie umieścić kod w ThisWorkbook. Np [syntax=vb]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Not Intersect(Target, Sh.Range("B8:AK8,A16:AK16")) Is Nothing Then MsgBox Date & " " & Application.UserName End If End Sub[/syntax]Wartości wyświetlane w przykładzie przez MsgBox przypisz...
Podstaw nazwę użytkownika pod zmienną, następnie sprawdzaj w dodatkowej instrukcji. [syntax=vb]With ark Do While .Cells(wrs, 2) <> "" haslo = .Cells(wrs, 6) 'tutaj podstaw usrName = .Cells(wrs,8) If .Cells(wrs, 2) = login Then test = True Exit Do End If wrs = wrs + 1 Loop 'jeśli hasło znalezione If test = True Then If haslo = InputBox("Podaj hasło...
Witajcie. Chcę uruchomić web service w wersji standalone. W Delphi wybieram więc New > Other > WebServices > SOAP Server Application i dalej typ WebBroker w wersji Stand-alone application który wykorzystuje Indy HTTP Server komponent. Teraz chciałbym zapytać jak zaadoptować w wersji Stand-alone application opcję basic authentication czyli coś podobnego...
[syntax=vbscript]Sub Dopisz() nw = Cells(Rows.Count, "C").End(xlUp).Row + 1 For x = 5 To nw If Cells(x, "C") = "" Then Range("C" & x) = "Szukaj pierwszej wolne i wpisz, za każdym kliknięciem" Range("D" & x) = "1" Range("F" & x) = "Przykład" Range("C" & x).Interior.ColorIndex = 37 Range("E" & x) = Application.UserName Range("C" & nw + 1).Activate End...
outlook.nk2 w lokalizacji C:\documents and settings\username\application data\microsoft\outlook
same polskie, klawiaturowe Ś, Ź, Ć, itp. - jest to polskie, wstaw w VBA - jak wyświetla? Latwiej porownanie userName na arkuszu(działa Unicode) np. If Application.CountIf(Range("users"), Lcase(Environ("UserName")))=0 Then Application.Calculation = xlManual users - nazwa zakresu gdzie te 4 osoby, np. Z1:Z4
Kolego dla mp 161spf Należy wgrać ten: [Version]Ver.6.19 [Firmware No.]B8925526H Natomiast mpc 2500: [Program Name]Network Support [Version]Ver.5.20.1 [Firmware No.]B2385605L 5.20.1Symptom corrected: 1.Unable to Scan to SMB to Windows 7 or Windows Server 2008 R2 destinations that have Windows Live ID Sign-in assistant installed. 2.Trying and failing...
Adwclener po uruchomieniu. # AdwCleaner v3.006 - Report created 02/10/2013 at 18:32:32 # Updated 01/10/2013 by Xplode # Operating System : Windows 8 (64 bits) # Username : Tenmądry - PULPIT # Running from : C:\Users\Tenmądry\AppData\Local\Microsof... Internet Files\Content.IE5\S332JRS5\AdwCleaner.ex... # Option : Clean ***** Dodano po...
Oto konfiguracja !This is the running config of the router: 192.168.0.245 !---------------------------------------... !version 12.4 no service pad service tcp-keepalives-in service tcp-keepalives-out service timestamps debug datetime msec localtime show-timezone service timestamps log datetime msec localtime show-timezone...
Nie, nie zawiesiło się. Po prostu nie odpowiadało mi to, ze po uruchomieniu radia trzeba było za każdym razem wchodzić w "ulubione" żeby wybrać swoją stację. Teraz tego problemu już nie ma :) Powodzenia. ________________________________________... Pojawiła się kolejna odsłona tego softu LLFirm_V1.49_All_3.5inch_models z dnia...
[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) 'Updateby Extendoffice 20160829 Const xRg As String = "A1:DA18000" Dim strOld As String Dim strNew As String Dim strCmt As String Dim xLen As Long With Target(1) If Intersect(.Cells, Range(xRg)) Is Nothing Then Exit Sub strNew = .Text Application.EnableEvents = False Application.Undo...
kolumnie "O" dodawała się data i nazwa uzytkownika Sheet4.Range("O" & ileW + 3).Value = Date & " " & Application.UserName
Cześć, mam taką dziwną sytuacja. Na dysku wspólnym mamy pliczek zawierający małe makro (kod niżej) i problem polega na tym, że każdego dnia ten pliczek, a raczej jego kopię znajduję w różnych folderach. Sprawdzając detale widzę użytkownika, który zapisał go tam, tylko tego użytkownika nie ma od kilku dni, a jeszcze dnia poprzedniego ten folder byl pusty......
A spróbuj tak, co się będzie działo ? (Może nie przywracasz pierwotnego działania wszystkim, zmienionym uprzednio, klawiszom ?) [syntax=vba]Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim nrPlikuWyj1 As Integer: nrPlikuWyj1 = FreeFile Dim op1 As String: op1 = ThisWorkbook.Name Dim op2 As String: op2 = Application.UserName & "/" & Environ("Username")...
zgadza się tylko odwrotnie, u mnie najważniejsze to: 1. odczytanie Uzytkownik = Application.UserName, i po nazwisku odszukanie w pliku urlopy odpowiedniego nazwiska 2. skopiowanie wiersza z zaznaczonymi dniami urlopów 3. zmiana wpisów z plików urlopy na normalne daty 4 przekopiowanie do kalendarza dat ( do skoroszytu "Święta" ), aby kalendarz sam zaznaczył...
Przetestuj: [syntax=vb]For Each sh In ActiveWorkbook.Sheets If Application.UserName = "azun" Then sh.Visible = True ElseIf sh.Name <> "Arkusz1" Then sh.Visible = xlSheetVeryHidden End If Next[/syntax]
[syntax=vb]Dim przed Private Sub Worksheet_Change(ByVal Target As Range) Dim i As Long With Target If .Cells.Count > 1 Then Exit Sub If .Column > 5 Or .Column < 3 Then Exit Sub End With If Target.Value = przed Then Exit Sub Application.EnableEvents = False i = Target.Row Range("A" & i).Value = Environ("Username") Range("B" & i).Value...
Może ktoś powie że to proste było, ale nikt nie odpowiedział, więc sam odpowiem dla początkujących, tak jak i ja. Korzystałem z edytora skryptów. Utworzyłem nowy i dla każdego dysku komendy: tell application "Finder" try mount volume "smb://USERNAME:PASSWORD(at)SERVER/SHARE... delay 1 end try end tell Zapisałem jako aplikacje na biurku, więc jak tylko...
Witam poniżej działające makro: otwierasz plik excel - powstaje wpis edytujesz zapisujesz zamykasz - powstaje wpis [syntax=vb]Private Sub Workbook_Open() Dim nrPlikuWyj On Error Resume Next nrPlikuWyj = FreeFile Open "F:\Marek\OFFICE\test formuł\LISTA_LOGI.log" For Append Shared As #nrPlikuWyj Write #nrPlikuWyj, _ ThisWorkbook.Name & _ " otwarto " &...
Zdarzenie 'change' jest przed samym edytowaniem Mozna tak:[syntax=vb]Private Sub Worksheet_Change(ByVal Target As Range) f Target.Column = (5) Then Target.Offset(0, 1) = Now Target.Offset(0, 2) = Application.UserName End If ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub Private Sub Worksheet_SelectionChange(ByVal Target...
Blokowanie uzyskasz poprzez założenie hasła. Numerowanie komentarzy poniżej. [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) Dim a As String If Not Application.Intersect(Range("A1:C10"), Range(Target.Address)) Is Nothing Then i = Environ("USERNAME") & " <" & Now & ">" & vbNewLine & Target & vbNewLine...
Tutaj powinien byc: C:\Documents and Settings\%USERNAME%\Local Settings\Application Data\Google\Chrome\Application
Witam Potrzebuje stworzyć makro które ma działać w następujący sposób: po kliknięciu w przycisk ma zapisać wybrany arkusz w PDF na pulpicie (super by było gdyby była jeszcze nazywa pliku była wartością tekstową komórki A1,zwykły tekst) i tu zaczynają się schody, ponieważ takie makro zrobiłem (tylko bez nazwy, ale to nie jest konieczne) ale działa tylko...
Typ pliku: EXE DATA OTRZYMANIA PRÓBEK WSTĘPNYCH: 14 listopada 2020 r Szczegóły wpisu Pojawia się w systemie jako plik upuszczony przez inne złośliwe oprogramowanie lub jako plik pobrany nieświadomie przez użytkowników podczas odwiedzania złośliwych witryn. Instalacja Tworzy następujące kopie siebie w systemie, którego dotyczy problem: %Dane aplikacji%\Ground.exe...
Nie masz tworzyć linku do pliku tylko link do narzędzia przetwarzania. pdf.PHP: [syntax=php] if ($sql_link=mysqli_connect(db_host,db_use... { $sql_res= mysqli_query($sql_link, "SELECT link FROM pliki WHERE username = '{$_SESSION['userloguj']}' AND id_pliku = {$_GET['nr_pliku']}"); $row=mysqli_fetch_assoc($sql_res); mysqli_free_result($sql_res);...
Witajcie, Podczas wywołania kodu Private Sub Workbook_Open() Dim nrPlikuWyj1 As Integer: nrPlikuWyj1 = FreeFile Dim op1 As String: op1 = ThisWorkbook.Name Dim op2 As String: op2 = Application.UserName & "/" & Environ("Username") On Error Resume Next Open "\\xxxxxxxx\log_BU3.1.txt" For...
Pliki tymczasowe w: Windows Vista: C:\Users\ Windows XP: C:\Documents and Settings\ Windows 7: C:\Users\[User name]\AppData\Local\Google\Chrome\User Data\Default\Cache
Wejdź do C:\Documents and Settings\user_name\Local Settings\Application Data\Microsoft\Outlook i przekopiuj wszystkie pliki do nowego outlooka. Teraz będziesz miał wszystkie dane ze starego outlooka przeniesione do nowego.Pozdrawiam.
Zmien nazwe pliku extend.dat z C:\Documents and Settings\%username%\Local Settings\Application Data\Microsoft\Outlook na extend.old i uruchom OE. Sprawdz tez te klucze: HKEY_CURRENT_USER\Software\Microsoft\Off... HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Of... Jezeli jest tam odwolanie do tego pliku to je usun.
Ulubione(jak i reszta ustawień, plików) w Chrome przechowywane są: Vista, C:\Users\ w XP, C:\Documents and Settings\ \Google\Chrome Możesz użyć jakiegoś programu do odzyskiwania plików(nic już nie kombinuj/zapisuj etc na tym dysku), przeskanować całą partycję i spróbować (usunięte/po formacie) odzyskać pliki z powyżej podanych lokalizacji(oczywiście...
Hej, szukam zabezpieczeń do swojego kodu VBA (ponoć nie ma większego problemu ze zwykłym hasłem). Zrobiłem sobie np. zabezpieczenie datą (jeżeli zostanie przekroczona to wyłącza aplikację) i komunikatem o autorze przy włączaniu programu. Proszę o pomoc w rozwiązaniu swoich pomysłów, no i byłoby fajnie gdyby ktoś dorzucił coś od siebie. 1)Chciałbym żeby...
Z porad znalezionych w internecie w języku angielskim: 1. Wyczyścić folder z tymczasowymi plikami, gdzie flash trzyma swoje pliki. Wadliwe pobieranie (uszkodzony plik) mogą powodować problemy z dźwiękiem. 2. W przypadku Windows XP usunąć następujące pliki C:\Documents and Settings\%UserName%\Application Data\Adobe\Flash Player C:\Documents and Settings\%UserName%\Application...
witam, wczoraj z własnej głupoty "zaopatrzyłem" się w wirusa. co jakiś czas wyskakuje komunikat, że program svchost.exe przestał działać do tego, ikonka chrome się zmieniła i przy jej odpaleniu mam następujący komunikat: C:\Users\username\AppData\Local\Google\C... Nieokreślony błąd oraz Error. Out of memory log z OTL'a [url=http://wklej.to/2T6XB]OTL
Witam Poszukuje wsparcia w utworzeniu odpowiedniego makra. Posiadam dwa skoroszyty. W pierwszym "A" znajduje się arkusz z tabelą w którą chcę z automatu wprowadzać dane. Jedna cześć danych będzie narzucona i automatycznie wpisywana przez narzucony schemat w makro Druga cześć danych będzie kopiowana z tego samego skoroszytu " A" , tylko z innych komórek...
Cześć, Mam problem z comboboxem, w którym potrzebuję ograniczyć możliwość wpisywania do wartości z klawiatury. Wiem, że można zupełnie zablokować możliwość wpisywania w comboboxie ale ze względu na długie listy nie chciałbym tego robić. Jak można ograniczyć możliwość wpisywanie wartości dla comboboxa aby: 1. w przypadku comboboxów z wartościami można...
OK, tylko wieczorzem, jest nie dla 10 minut, teraz mam prace. Dodano po 3 1. jak uz jest: Set arkusze = Workbooks.Open("C:\Users\" .... wtedy wystarczy arkusze.Close False bez tego 'zamknijdanyarkusz', skoro otwierasz pliki po koleji 2. elementy petli For i.... Select Case ..... różnią się tylko litera(A B C G H... R) Wtedy dwie sciezki ....( &...
Witam, gra działała bez zarzutu do dzisiejszego wieczora, teraz wyskakuje komunikat: No Label Crash Time: 01/20/07 20:22:44 OS: Windows XP 5.1 (Build: 2600) CPU: AuthenticAMD PentiumPro-class processor (at) 1401 MHz with 511MB RAM Video: RADEON 9550 (6561) UserName: Zdzisio ComputerName: ZOOBFFB75DAC2A Application location: D:\Program Files\VUGames\SWAT...
Witam kolegow koderow. (nie mam polskich znakow, damn) Mam problem. Otoz wprowadzam drobne zmiany w interfejsie na stronie internetowej, ktora pozwala uzytkownikowi na wglad w pomiary miernika. To jest akurat niewazne. Do czego zmierzam - kiedy wprowadzam adres strony, jestem skierowany do witryny logowania: http://obrazki.elektroda.pl/4528345600_1...
Skasowałem profil w Microsoft Edge, po tym zabiegu przeglądarka się natychmiast zamknęła i od tej pory nie da się jej uruchomić. Czego próbowałem: - restart -naprawa -reinstalacja -kasowanie profilu w \Users\%username%\AppData\Local\Microsof... - kasowanie rejestru HKEY_CURRENT_USER\Software\Microsoft\Edg... Nie jest to problem z rozszerzeniami,...
wstaw username application volatile forms application
odblokować drukarkę epson astra sygnał przekaźnik globalne wyłączenie przerwań
reset pieca buderus bateria parkside styki
Wiring a Week Clock Timer Directly to Gate Controller Panel (e.g., Crawford ECS950, CDM9) Without Using External Pushbutton Łucznik 723 – wymiana krzywki i kół zębatych, synchronizacja mechanizmu
