Премини към съдържанието

milenk

Потребител
  • Публикации

    25
  • Регистрация

  • Последно онлайн

Всичко публикувано от milenk

  1. Сега проверих папката WinSxS и ми се струва, че има нещо ненормално след като при 8 се опитват да я поразчистят. Преди време съм ползвал програмата PatchCleaner . Тя да е омазала нещо?
  2. Правил съм го и друг път. Ето резултата: Microsoft Windows [Version 10.0.17763.2114] (c) 2018 Microsoft Corporation. All rights reserved. C:\Users\Administrator>sfc /scannow Beginning system scan. This process will take some time. Beginning verification phase of system scan. Verification 100% complete. Windows Resource Protection did not find any integrity violations. C:\Users\Administrator> При рестарт се затваря бързо и когато започне да зарежда на черния екран стои много и си върти
  3. Здравей, то хубаво прави чисто зареждане ама мноооооого бави.
  4. Спирал съм всички програми които зареждат и все тая. Просто стои на черен екран и върти много време докато се покаже десктопа. А при първоначално стартиране не успява да направи и три оборота и изгрява десктопа. Не се влачи след актуализация а след всеки рестарт.
  5. С хард диск съм. Затова се чудя защо е тази разлика във времето на зареждане. То май е по-добре да го гася и веднага да го пусна вместо да чакам. Ако е правил някаква актуализация разбирам да се бави. Диска е ОК няма проблеми
  6. Машинката е с Windows 10. Procesor I7 na 2800 .... 8 GB ram. При първоначално зареждане зарежда за около 30, 40 сек. Гасне при изключва за нула време. Когато го рестартирам се гаси бързо, но при зареждането почва едно въртене на кръгчето та докато ми порасне брадата. Минават може би 4 .... 5 мин. Когато зареди си работи нормално. Моля за мнения, за което благодаря.
  7. Целта е да се провери дали датата на компютъра е манипулирана. Прилагам файл с макрос който върши горе долу исканото , но не успях да го наглася с БГ локализация . Във файла има и описание. Благодаря на озовалите се proba.xlsm
  8. Пробвах .... Няма резултат
  9. Опиши моля те къде точно е това микро ключе долу (NO контакт). Ако е възможно една снимка .... Точно съобщението ".DREGDRAWER MISS"..... сега ми липсва. Когато се появи и поставя чекмеджето машината заработва.
  10. Хмммм. При мен явно не отчита ваденето и поставянето на чекмеджето. Датчик ако няма как разбира. че чекмеджето се вади и поставя за да нулира брояча?
  11. Правя всичко описано и обикновено си работи, но сега се е запънала и си седи така. Друг път изписва DREGDRAWER MISS и като сложа чекмеджето си заработва..
  12. При изписване на съобщението - Dregdrawer full - за запълване на чекмеджето с обработено кафе. След изпразването и почистването му машината не отчита това и си стой с надписа Dregdrawer full. Някакви идеи ?
  13. Това е макрос, който работи. Напреднах доста и вече всичко заработи. Сблъсках се с два проблема които не мога да реша. 1. Да търси файловете за четене в следния път: ThisWorkbook.Path в папката "Поръчки" и да се избират файлове за четене от нея. 2. Като се стартира макроса за избор на файл за четене, ако се откаже избор на файл и дава грешка. Листа DataTxtFile остава отворен и трябва да се рестартира програмата. Sub KopyKat() Dim sd As Worksheet, rd As Range Set sd = ThisWorkbook.Sheets("DataTxtFile") Set rd = sd.Range("A1") filespec = Application.GetOpenFilename() Set Wb = Workbooks.Open(FileName:=filespec) Wb.Activate Cells.Copy rd Wb.Close Range("A1").Select Columns("A:A").Select Selection.TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, _ TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, _ Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo _ :=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 2), _ Array(7, 1)), TrailingMinusNumbers:=True Range("A1").Select End Sub
  14. Не става така защото данните при копирането няма да се разнесат правилно
  15. Текстовите файлове ще се получават от различни места. Има си бутонче с макрос за отваряне на ТХТ файл. Кликаш на бутона и се отваря формата за избор на файл за четене и копиране на данните от него. Ако е в кодировка ANSI всичко си е на ред . Но Ако е UTF-8 се получава мяймуница. Направих кратко видео за да се види начина на работа и резултатите. Началото е с файл с ANSI кодировка а след това в с UTF-8 и се получава мяймуница. https://dox.abv.bg/download?id=771067df37#
  16. Благодаря за линка. Разгледах го има какво да науча от него и ще го разгледам по-обстойно, но не ми върши работа за случая. Аз пробвах друг вариант и работи. Отварям с Нотпад ТХТ файла и му давам запиши като. Показва, че кодировката му е UTF-8 .....сменям я на ANS и записвам. Отварям файла с програмата и всичко е ОК. Работи си. Целта ми в случая е да се избегнат тези допълнителни гимнастики а с макрос да се оправи кодировката.
  17. С приятел направихме Ексел таблица за направа на заявки за разкрой на детайли. За съжаление той почина за няма и една седмица от Covid. Преди да помоля за помощ доста порових из нета, но не успях да се справя. Ако ТХТ файла е в ANSI кодировка всичко си е ОК. Но 64 битовата версия на програмата, която се ползва за детайлите прави ТХТ файл с UTF-8 кодировка и всичко излиза ма маймуница ( не се чете ). Намерих това: Sub RangeToANSI() Dim c As CellFormat Application.ScreenUpdating = False For Each c In Selection c.Value = ToANSI(c.Value) Next c Application.ScreenUpdating = True End Sub При стартирането му казва, че ToANSI не е дефинирано. Трябва ми макрос, който да проверява формата ( кодировката ) на клетките в активния лист в диапазона - клетки А1:N до максималния брой с редове в които има данни и ако са UTF-8 кодировка да ги конвертира в ANSI. Моля за помощ от тези, които разбират и желаят да помогнат.
  18. Банкирането се извършва онлайн през сайта на банката. Предполагам, че това чудо е платено. Разгледах сайта . но съм зле с английския и не можах да намеря нещо за сваляне. Ако Ви те затруднявам моля за кратко обяснение какво да сваля.
  19. Преди няколко дена ми се обади една позната, че е получила емайл с прикачен рар файл и нещо не може да се справи с изтеглянето му. Било свързано нещо с принудително изпълнение. Попитах я дали и е познат емайла и този който го изпраща. След отговор , че нищо не и говори изпращача и казах да изтрие емайла и да не се занимава с глупости. Настоя да влезна с вювъра и да видим за какво иде реч. Изтеглих и разархивирах файла. Съответно в папката имаше само някакъв скрипт. Без да го пипам веднага изтрих и изхвърлих от кошчето рар файла и папката. На другия ден по новините стана дума точно за получаването на този емайл и последиците от използването на файла. Вчера пак ми се обади, че нещо банкирането и не се държи така както преди. Направила някакво платежно нареждане за около 1000 лв. и след подписването му веднага и се генерирало друго за над 9000 лв. Веднага затворила банкирането. Снощи ми донесе лаптопа и цяла нощ съм сканирал в безопасен режим с adwcleaner_6.040 , JRT , mbam-setup-2.2.1.1043 и 360TS. Всяка една от програмите изчисти всичко което откри. Притеснява ме, че mbam-setup-2.2.1.1043 открива над 11000 заплахи, но като и дам да ги изтрие в безопасен режим и нормално зареден програмата блокира. Отново повторих цялата процедура и изчаках търпеливо докъто всяка една програма покаже съобщение.че си е свършила работата. Този път всичко мина добре и има се обадих да дойдат и да си взвмат лаптопа. Като пуснаха страницата за банкирането се оказа, че платежните са станали две и са все от вчера.... Като избере откажи и веднага маркира подпиши и изпрати. Накарах я да се обади на поддръжката и те изтриха генерираните платежни и и предложили да и блокират сметката докато се изяснят нещата. Като гледам сметката на получателя е в унукредит. Казали са им да проверят компа за зловреден софтуер с някаква програмка WEBMEIUER или нещо подобно. Търсих нещо , но не успях да намеря. Ако се сещате за какво иде реч дайте едно рамо. Благодаря предварително
  20. С това,което исках под ХР се справих.... Сега се опитвам да сменя името на компютъра под Windows 7, но не намирам решение.... За сега намерих този скрипт,но не работи: strComputer = “.” Set objWMIService = GetObject(“winmgmts:” & “{impersonationLevel=impersonate}!\\” & strComputer & “\root\cimv2″) ‘Part 1 – Acquire serial/service tag number Set colSMBIOS = objWMIService.ExecQuery (“Select * from Win32_SystemEnclosure”) For Each objSMBIOS in colSMBIOS strSN = objSMBIOS.SerialNumber If strSN <> “” Then exit For Next ‘Part 2 – Assign computer name to serial/service tag number Name = strSN Set colComputers = objWMIService.ExecQuery (“Select * from Win32_ComputerSystem”) For Each objComputer in colComputers err = objComputer.Rename(name) if err <> 0 then wscript.echo “There was an error renaming the machine. Please restart, and try again.” else wscript.echo “Machine successfully renamed: ” & Name end if Next Ако някой има решение моля да помогне.
  21. Точно с MagicISO се боря... След рестарта излиза менюто, но при избор с какво да продължя работи едунствено зареждането от твърдия диск. При всички други дава следната грешка: No emylation type image RAW
  22. Искам на едно ДВД да сложя инсталацията на Виндовс ХП СП2 , Офиса, Хиренс боотСД и ВинХП_ливе ако може и стартуп диска на вин98. Като сложя ДВДто и рестартирам да ми излиза меню с възможност с какво да продължя. Примерно 1. Инсталация на ХП 2. Инсталация на Офиса 3. Хиренс боот СД 4. Старт ВинХПЕ_Ливе 5. Старт Боот Диск 98 --- за да вляза в ДОС 6. Боот от Хард диск Не ми е ясно всичко в една папка ли трябва да се нарине или всяко едно в отделна като се копират или екстракнат от ИСО инсталационните файлове. Коя програма трябва да използвам. Благодаря на отзовалите се
  23. Проблема е решен.... Направих си едно виртуално РС с инсталиран на него Вин98. Копирах имформацията от стария диск 1:1 директно на С: на диска на виртуалното РС и под ДОС промпт всичко си върви.... Преди това копирах имформацията от диска в отделна папка и тогава не тръгваше. Благодаря на всички отзовали се
  24. Става въпрос за РС, което е с Вин 3,11 и е работело предимно под DOS със счетоводна програма. Диска му е 400МБ. Може ли... и как да качя тази имформация на диска на РСто с ХП така,че имформацията от счетоводната програма да се запази и да може да се ползва на новото РС. Ако някъде из форума има имфо по този въпрос и това би ми помогнало. Благодаря на отзовалите се.
  • Разглеждащи това в момента   0 потребители

    • Няма регистрирани потребители разглеждащи тази страница.
×
×
  • Добави ново...

Информация

Поставихме бисквитки на устройството ви за най-добро потребителско изживяване. Можете да промените настройките си за бисквитки, или в противен случай приемаме, че сте съгласни с нашите Условия за ползване