Převod Excel log soubory ADIF

Proces přechodu z log MS Excel© na ADIF je poměrně jednoduché a lze provést pomocí trochu programování VBA. Prostřednictvím tohoto odkaz může odkazovat se na specifikace ADIF 1.0 který je používán většinou log, Je důležité, abyste si tento dokument.

Chcete-li spustit proces převodu na základě této konzultace začít vytvořením souboru v MS Excel©. V prvním prádlo Napište název pole budete chtít importovat (Zkontrolujte prosím ADIF 1.0 jména polí). I v první linii, typ “ADIF RAW” Na poslední buňka, Zde bude text napsaný v ADIF.

List je do této podoby (ale žádná data na lince 2). Ačkoli ve formátu ADIF nespecifikuje minimální počet polí, aspoň si QSO log musí mít hodnoty volání, QSO_Date, Time_On, Skupina E režim.

Pak vyberte celý list a formát buňky jako text.

Uložte soubor jako xls2adi.xls (list v MS Excel©)

Podívejme se nyní napsat a vložit kód v jazyce VBA. Přejděte na Nástroje / Makro a klepněte na příkaz Editor jazyka Visual Basic (Alt F11).

Na VBA editoru Poklepejte na "ThisWorkbook’ , který je v "Projektu – VBAProject ". To je místo, kde máte hlavní blok kódu, který se spustí při otevření tohoto souboru opět.

Blok kódu, který takto nastavuje některé proměnné a volá funkci fCampoAdifValido (vedení 05) , který zkontroluje, zda název pole, které je na prvním řádku odpovídá specifikaci ADIF. Pokud jsou všechny názvy polí jsou správné funkce volá postup pEscreveAdif (vedení 09) se bude psát log v ADIF, Je-li pole má neplatný název funkce zobrazí chybové hlášení (vedení 07) e skončil.

Kopírovat / vložit, nebo zadejte následující kód:

 

Private Sub Workbook_Open()
  Jak Boolean Dim bNomeDoCampoValido(conLinhaInicial)
  sUltimaColuna = fQualEAUltimaColuna(conColunaInicial)
  bNomeDoCampoValido = fCampoAdifValido(conColunaInicial, sUltimaColuna)
    Pokud se bNomeDoCampoValido = False pak ("Nalezené neplatné názvy polí" & vbCrLf & "Odstraňte sloupce naplněné v červeném!")
    Jiný

V editoru VBA, klepněte na tlačítko Vložit / Module. V tomto modulu se zbývající kód, který se nazývá hlavní blok.

Konstanty conLinhaInicial (vedení 02 Další blok) a conColunaInicial (vedení 03 Další blok) definuje linie 2 (Tabulkový procesor) mají první registraci a že sloupce (Tabulkový procesor) První pole.

Funkce fQualEAUltimaLinha (vedení 08 Další blok) a fQualEAUltimaColuna (vedení 17 Další blok) určí posledního řádku a sloupce dat. To vyžaduje prázdné buňky znamená konec log záznamů.

Funkce fCampoAdifValido (vedení 05 Předchozí do Bloco) testuje platnost názvu pole. Cyklu 'Select Case sNomeDoCampo’ (vedení 31 Další blok) více polí, mohou být přidány dle specifikace ADIF.

Postup pEscreveAdif (vedení 09 Předchozí do Bloco) napíše text ve sloupci, který má ADIF “ADIF RAW” první řádek. Tento postup je převzat z oboru Ifen QSO_DATE, dva body pole a přidal M TIME_ON na konci pole BAND. Aby to bylo makro lze uložit přísnější podmínky pro kontrolu údajů v tomto řízení.

Kopírovat / vložit, nebo zadejte následující kód v modulu:

 

Option Explicit 2
Public Const conColunaInicial As String = "A"
IUltimaLinha As Integer veřejné(iPrimeiraLinha As Integer) Integer(Folha1.Cells(iValRecebido, "A")) > 0
      iValRecebido = iValRecebido + 1
    Smyčka - 1
End Function(sPrimeiraColuna As String) String
  (sPrimeiraColuna)
    Dělat, když Len(Folha1.Cells(1, Chr(iValRecebido))) > 0
      iValRecebido = iValRecebido + 1
    Smyčka(iValRecebido - 1)
End Function(sPrimeiraColuna As String, sUltimaColuna As String) Boolean(sPrimeiraColuna) Na Asc(sUltimaColuna)
      sNomeDoCampo = LCase(Folha1.Cells(1, iColunaCorrente - 64))
      Select Case sNomeDoCampo "skupina": fCampoAdifValido = True "volání": fCampoAdifValido = True "CQZ": fCampoAdifValido = True "způsob": fCampoAdifValido = True "qso_date": fCampoAdifValido = True "rst_rcvd": fCampoAdifValido = True "rst_sent": fCampoAdifValido = True "SRX": fCampoAdifValido = True "STX": fCampoAdifValido = True "time_on": fCampoAdifValido = True "ADIF surovin"
          fCampoAdifValido = True - 64
        Case Else(1, iColunaCorrente - 64).Interior.Color = RGB(255, 0, 0)
          fCampoAdifValido = False()
  As Integer Dim ILinhaCorrente ""
    Pro iColunaCorrente = Asc(conColunaInicial) Na Asc(sUltimaColuna) - 1
      Pokud se LCase(Folha1.Cells(1, Chr(iColunaCorrente))) = "skupina" Pak(iLinhaCorrente, Chr(iColunaCorrente)) & "M"
      Jiný(Folha1.Cells(1, Chr(iColunaCorrente))) = "qso_date" Pak(Folha1.Cells(iLinhaCorrente, Chr(iColunaCorrente)), "-", "")
        Jiný(Folha1.Cells(1, Chr(iColunaCorrente))) = "time_on" Pak(Folha1.Cells(iLinhaCorrente, Chr(iColunaCorrente)), ":", "")
          Jiný(iLinhaCorrente, Chr(iColunaCorrente))
          End If & "<" & LCase(Folha1.Cells(1, Chr(iColunaCorrente))) & ":" & Jen(sTextoNaCelula) & ">" & sTextoNaCelula(iLinhaCorrente, iAdifRaw) = SLinhaEmAdif & "<" & "EOR" & ">"
  Další

 

Klikněte na Soubor / Uložit xls2adi.xls a zavřete Editor VBA.

Zkopírujte data v souborech MS Excel© Chcete-li převést do příslušného sloupce, vážně skončit na konci a MS Excel©.

Možná budete muset změnit nastavení pro MS Excel sugurança© spustit makra, Je-li nutné v menu Nástroje / Makro a klepněte na příkaz Zabezpečení, zvolte nižší úroveň. To byla napsána pro MS Excel© em MS Windows XP© (jak v portugalské verzi). Pomocí tohoto kódu je noutra VAI lingua, např. v angličtině, nahradit pojem "List1’ Por "List1’

Při poklepání na soubor xls2adi.xls, kód, který jste zadali budou provedeny a sloupců “ADIF RAW” je náš Přihlášení formátu ADIF.

Nyní až do konce, vyberte sloupec obsah “ADIF RAW” e kopie (Ctrl C), začátek nebo Poznámkový blok (Poznámkový blok) e školy (Ctrl V). Uložte soubor s příponou další.

Tento ukázkový kód je volně k použití, Můžete svobodně používat. Jedná se o velmi jednoduchý příklad, co lze provést pomocí VBA (Visual Basic for Applications). Doplní tento kód validace s přesnějšími, zejména v qso_date oblastech "’ e 'time_on ", kde formátu musí odpovídat specifikaci ADIF. Pokud zaznamenáte chybu nebo máte nějaké dotazy, neváhejte komentář. Doufám, že článek bude užitečný.

Tags: ,

Instalace systému Debian NVIDIA grafické karty

To je, další "Jak se …’ a znovu na nVidia grafiku, Rozdíl je v tom, že to funguje perfektně pro mě (ne oba Debian a Ubuntu ne).

První doporučení se na stránky ke stažení ovladače NVIDIA, vybrat model karty, OS (V mém případě 32-bit Linux) e Đą. A volba 2 nao pracuje pro Linux. Klepněte na tlačítko DOWNLOAD, zkopírovat adresu odkazu, který je na tlačítku SOUHLAS & DOWNLOAD (něco jako http://us.download.nvidia.com/XFree86/Linux-x86/190.53/NVIDIA-Linux-x86-190.53-pkg1.run).

Otevřete terminál a typ su projít kolem kořene.

Typ apt-get install build-essential linux-headers-$(uname -r).

Typ cd /usr/src na výzvu ptáků do tohoto adresáře.

Typ ln -s linux-headers-$(uname -r) linux vytvořit symbolický odkaz.

Typ wget a klikněte pravým tlačítkem myši vložte zkopírovaný odkaz na stránku od NVIDIA (bude stát, jak wget http://us.download.nvidia.com/XFree86/Linux-x86/190.53/NVIDIA-Linux-x86-190.53-pkg1.run).

Typ /etc/init.d/gdm stop Tím se zastaví gdm a přechází do terminálu. Od tohoto okamžiku je vhodné, aby tento článek vytisknout, to bude bez grafického prostředí.

Nyní, když je v terminálu zadat v promptu cd /usr/src.

Poté spusťte instalační skript zadáním NVIDIA sh NVIDIA-Linux-x86-190.53-pkg1.run.

Instalační program se vás zeptá začít přijměte podmínky licenční smlouvy.

Odpověď NO otázka o stahování jádro NVIDIA.

Klepněte na tlačítko OK sestavit nové jádro.

Klepněte na tlačítko NO na zprávu "… nyní abort ".

Nechte instalátor a vyberte Pokračovat Ano povolit automatické aktualizace vašeho xorg.conf pomocí nvidia-xconfig.

Klepněte na tlačítko OK a když instalátor skončí, zůstane opět v terminálu řádku, zadejte startx začít znovu X server.

Nyní můžete upravit rozlišení a dalších pokročilých nastavení pro grafické karty NVIDIA X Server Settings nástroj, který je v menu Nástroje (Nástroje pro správu systémů).

Tags: , , ,

ASCII na UTF-8 konvertor

ASC2UTF8 je malý nástroj pro konverzi některé speciální znaky z ASCII do UTF-8.

ASC 2 UTF-8 Converter

Při přípravě, s určitou frekvencí, Texty, aby do PHP skriptů, přišlo, že je třeba napsat tento nástroj v Gambas2.

Při práci se dvěma nebo více jazyků echo v prostředí HTML, psát speciální znaky mohou být zajímavou výzvou. Pomocí tagu META <meta http-equiv=Content-Type content="text/html; charset=UTF-8"> a srovnávací tabulky pro UTF-8 může být dobrým řešením (Výsledkem aspoň u mě). Nástroj ASC2UTF8 pouze převádí některé speciální znaky, ti, kteří skutečně potřebují převést mě faziam. O code-Fonte lze snadno změnit na jiné speciální znaky.

Tags: , ,

Como Instalar o OpenOffice 3.1 Debian není 5.0 Lenny

Pro Debian Lenny defeito uvedené v OpenOffice 2.6.4, Ale OpenOffice 3.1 byl propuštěn, instalace, jednoduše postupujte podle následujících kroků:

  • Přidejte úložiště backports, jako root / etc / apt / sources.list a přidejte řádek deb http://www.backports.org/debian lenny-backports main contrib non-free
  • Otevřete konzoli (como root)
  • Instale o 'Debian backports přívěškem na klíče’ psaní apt-get install debian-backports-keyring
  • Aktualizuje seznam balíků příkazem apt-get update
  • Por FIM instale o OpenOffice.org apt-get -t lenny-backports install openoffice.org

E brzy, je. O OpenOffice.org 3.1 je nainstalován a připraven k použití, digite "openoffice.org’ konzole nebo pomocí menu "Aplikace".

Tags: