Похожие вопросы

Работа с часами и минутами в Excel 2007
Как сделать дату гггг-ММ-ДД (ISO-8601) по умолчанию в Excel?
Автоматически вставлять время / дату последнего изменения в notepad++
Режим редактирования Excel: время без секунд
Как рассчитать часы и минуты между двумя периодами времени?
Ошибка правой функции Excel VBA
Апплет для копирования текущей даты+времени как гггг-ММ-ДД чч: мм в буфер обмена?
Excel VBA или Формула для преобразования текста в дату с типом времени
Не удается синхронизировать время, Windows 7
Как изменить формат даты с ДД-ММ-гггг на ДД-ММ-гг в строке формул MS-EXCEL?
Как использовать условное форматирование для выделения конкретных дней недели и временных периодов?
Изменение формата даты и времени в нескольких CSV-файлах
Как заставить excel вернуть дату из столбца, соответствующего последнему "да" в другом столбце
Преобразование пятизначного числа в формат даты в Excel?
Почему Excel не распознает и не форматирует даты последовательно?

Апплет для копирования текущей даты+времени как гггг-ММ-ДД чч: мм в буфер обмена?

Мне иногда нужно ввести текущую дату + время в формате MySQL, т. е. ГГГГ-ММ-ДД ЧЧ:ММ

прежде чем я напишу сам, кто-нибудь знает о апплете Windows, который это делает, поэтому я мог бы просто дважды щелкнуть по нему и вставить буфер обмена в другое место?

спасибо.


Edit: оказывается, это было довольно легко сделать в Freebasic, хотя это апплет консоли вместо графического апплета:

#include "vbcompat.bi"
#include "windows.bi"

Sub ClearClipboard(hwnd As HWND = NULL)
    OpenClipboard(hWnd)
    EmptyClipboard()
    CloseClipboard()
End Sub

Sub WriteClipboard(Text As String, CPFormat As Integer = CF_TEXT, hWnd As HWND = NULL)        
    Var hGlobalClip = GlobalAlloc(GMEM_MOVEABLE Or GMEM_SHARE, Len(Text)+1)        
    OpenClipboard(hWnd)
    EmptyClipboard()
    Var lpMem = GlobalLock(hGlobalClip)
    CopyMemory(lpMem, StrPtr(Text), Len(text))
    GlobalUnlock(lpMem)
    SetClipboardData(CPFormat, hGlobalClip)
    CloseClipboard()
End Sub        

Dim a As Double = Now()
Dim CurrentDateTime as String

ClearClipboard()
CurrentDateTime = Format(a, "yyyy-mm-dd hh:mm")
WriteClipboard(CurrentDateTime)
5
задан OverTheRainbow
источник

1 ответов

Я быстро сделал утилиту HTA для этого с именем GetMySQLDateTime использование VBScript. Не стесняйтесь использовать/изменять/распространять его для любых целей. Поскольку это HTA, вы можете напрямую изменять код с помощью любого текстового редактора.

Screenshot

использование: просто запустите его и текст будет в буфере обмена. Нажмите кнопку "Обновить", чтобы обновить его.

0
отвечен Scott Rhee 2014-03-27 01:19:52
источник

Другие вопросы date-time mysql windows