SpringPad to EverNote

Что бы полностью перейти со SpringPad на EverNote нужно выгрузить каким-то образом заметки из одной системы в другую. О том как это сделать хорошо написано здесь, но дело в том, что backup заметок из SpringPad — это один огромный HTML файл. И загружается он в EverNote как одна заметка. Неудобно. Но есть выход. Применим этот скриптик и разделим один файл на кучу файлов с заметками:
скачать последнюю версию можно тут

def writeNote(i,text):
	nf = open('note-'+str(i)+'.htm','w')
	nf.write(text)
	nf.close()

optionCleanHeader = True #Empty header

f = open('index.html','r')
if optionCleanHeader:
	header = "<html><body><div>"
else:
	header = ""
headerComplete = False
footer = "</div></body></html>"
noteStart = False
note = ""
i = 0
for line in f:
	if '<div class="instance' in line:
		if not headerComplete:
			headerComplete = True
			#Finish header
		if noteStart:
			#Finish note
			writeNote(i,header+"\n"+note+"\n"+footer)
		i += 1
		noteStart = True
		note = line
	else:
		if (not headerComplete) and (not optionCleanHeader):
			header += line
		elif noteStart:
			note += line
if noteStart:
	#Finish last note
	writeNote(i,header+"\n"+note+"\n"+footer)		

Excel тормозит

Обратился к нам клиент с вопросом: тормозит Excel, причем именно на одном конкретном листе. Все остальные листы в той же книге работают нормально. Анализ (и Google) дал прекрасную ссылку — правда к тому времени мы уже догадались грохнуть огромный файл drawings внутри архива xlsx, но макрос не менее ценен! Суть проблемы в огромном количестве пустых объектов типа Shape. Нужно их удалить и будет всем счастье!

Sub DeleteAllTextBox()
Dim oSh As Shape
For Each oSh In ActiveSheet.Shapes
oSh.Delete
Next oSh
End Sub

Kaspersky 2013 bug

Столкнулись со следующей проблемой, при использовании KIS 2013 (13.0.1.4190(f)) — зависает на 50% поиск руткитов — рекомендуем отключить.

 

KIS2013

Отключить регулярную автоматическую проверку Руткитов