Muunna Excelin lokitiedostoja ADIF

Prosessi vaihdettaessa MS Excelin log© että ADIF on suhteellisen yksinkertainen ja voidaan tehdä käyttäen hieman ohjelmointia VBA. Tätä kautta linkki voi viitata eritelmät ADIF 1.0 joka on käytössä useimmilla log, On tärkeää, että luet tämän asiakirjan.

Aloita muuntamisprosessin perustuu tämän opetusohjelman aloittaa luomalla tiedosto MS Excel©. Ensimmäisessä liinavaatteet Kirjoita nimi kentät haluavat tuoda (Tarkista ADIF 1.0 nimen kentät). Jo ensimmäisellä rivillä, tyyppi “ADIF RAW” viimeinen solu, Täällä Teksti kirjoitetaan ADIF.

Laskentataulukko on tällaiseksi (mutta vielä ei ole tietoa line 2). Vaikka ADIF muotoa ei määritellä vähimmäismäärä kentät, Ainakin QSO log on arvot Soita, QSO_Date, Time_On, Band E-tila.

Valitse sitten koko laskentataulukon ja muotoile solut tekstinä.

Tallenna tiedosto xls2adi.xls (laskentataulukko MS Excel©)

Tehkäämme nyt kirjoittaa ja lisätä koodin VBA. Siirry Työkalut / Makro ja valitse Visual Basic Editor (Alt F11).

Vuonna VBA editori kaksoisnapsauttamalla 'ThisWorkbook’ joka on "Project – VBAProject ". Tämä on, jos saat tärkein koodiosion joka jatkuu kun avaat tämän tiedoston uudelleen.

Koodiosion joka seuraa asetetaan joitakin muuttujia ja pyytää toiminnon fCampoAdifValido (viiva 05) että tarkistaa onko kentän nimi, joka on ensimmäisellä rivillä vastaa määrittely ADIF. Jos kaikki kenttien nimet ovat oikein funktiokutsut menettely pEscreveAdif (viiva 09) kirjoittaa kirjaudu ADIF, Jos kenttä on virheellinen nimi toiminto näyttää virheilmoituksen (viiva 07) ja päättyy.

Kopioi / liitä tai kirjoita seuraava koodi:

 

Private Sub Workbook_Open()
  Koska Boolen Dim bNomeDoCampoValido
  (conLinhaInicial)
  sUltimaColuna = fQualEAUltimaColuna(conColunaInicial)
  bNomeDoCampoValido = fCampoAdifValido(conColunaInicial, sUltimaColuna)
    Jos bNomeDoCampoValido = False Sitten
       ("Löytyi Virheellinen kenttien nimet" & vbCrLf & "Poista sarakkeet täytetään punaisella!")
    Muu
      

Vuonna VBA editorissa, valitse Insert / Module. Tässä moduulissa on jäljellä koodia kutsutaan tärkein lohko.

Vakiot conLinhaInicial (viiva 02 Seuraava lohko) ja conColunaInicial (viiva 03 Seuraava lohko) määritellä linja 2 (Taulukkolaskentaohjelma) on ensimmäisen rekisteröinnin yhteydessä ja että sarakkeen (Taulukkolaskentaohjelma) ensimmäistä kenttää.

Toiminnot fQualEAUltimaLinha (viiva 08 Seuraava lohko) ja fQualEAUltimaColuna (viiva 17 Seuraava lohko) ratkaisee viimeisen rivin ja sarakkeen tiedot. Tämä edellyttää Tyhjä solu tarkoittaa loppua lokitietueet.

Toiminto fCampoAdifValido (viiva 05 Edellinen lohko) testaa pätevyyttä kentän nimi. Sykli "Select Case sNomeDoCampo’ (viiva 31 Seuraava lohko) lisää kenttiä voidaan lisätä mukaan erittely ADIF.

Menettely pEscreveAdif (viiva 09 Edellinen lohko) kirjoittaa tekstiä sarakkeeseen, joka on ADIF “ADIF RAW” ensimmäinen rivi. Tämä menettely on otettu alalla Ifen QSO_DATE, kaksi pistettä alan ja lisäsi TIME_ON M lopussa kentän BAND. Jotta tämä makro voidaan asettaa tiukempia ehtoja tarkistamalla tietoja tässä menettelyssä.

Kopioi / liitä tai kirjoita seuraava koodi sisällä moduuli:

 

Option Explicit
 2
Public Const conColunaInicial As String = "A"
As Integer Public iUltimaLinha
(iPrimeiraLinha As Integer) As Integer
  (Folha1.Cells(iValRecebido, "A")) > 0
      iValRecebido = iValRecebido + 1
    Silmukka
   - 1
End Function

(String sPrimeiraColuna) String
  (sPrimeiraColuna)
    Älä Vaikka Len(Folha1.Cells(1, Chr(iValRecebido))) > 0
      iValRecebido = iValRecebido + 1
    Silmukka
  (iValRecebido - 1)
End Function

(String sPrimeiraColuna, sUltimaColuna As String) Boolen
  (sPrimeiraColuna) To Asc(sUltimaColuna)
      sNomeDoCampo = LCase(Folha1.Cells(1, iColunaCorrente - 64))
      Valitse Case sNomeDoCampo
         "bändi": fCampoAdifValido = True
         "puhelu": fCampoAdifValido = True
         "CQZ": fCampoAdifValido = True
         "tila": 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 raaka"
          fCampoAdifValido = True
           - 64
        Case Else
          (1, iColunaCorrente - 64).Interior.Color = RGB(255, 0, 0)
          fCampoAdifValido = False
        ()
  As Integer Dim iLinhaCorrente
   ""
    Saat iColunaCorrente = Asc(conColunaInicial) To Asc(sUltimaColuna) - 1
      Jos LCase(Folha1.Cells(1, Chr(iColunaCorrente))) = "bändi" Sitten
        (iLinhaCorrente, Chr(iColunaCorrente)) & "M"
      Muu
        (Folha1.Cells(1, Chr(iColunaCorrente))) = "qso_date" Sitten
          (Folha1.Cells(iLinhaCorrente, Chr(iColunaCorrente)), "-", "")
        Muu
          (Folha1.Cells(1, Chr(iColunaCorrente))) = "time_on" Sitten
            (Folha1.Cells(iLinhaCorrente, Chr(iColunaCorrente)), ":", "")
          Muu
            (iLinhaCorrente, Chr(iColunaCorrente))
          End If
         & "<" & LCase(Folha1.Cells(1, Chr(iColunaCorrente))) & ":" & Vain(sTextoNaCelula) & ">" & sTextoNaCelula
    (iLinhaCorrente, iAdifRaw) = SLinhaEmAdif & "<" & "EOR" & ">"
  Seuraava

 

Klikkaa File / Save xls2adi.xls ja sulje VBA editori.

Nyt kopioi tallennettuja MS Excel-tiedostoja© haluat muuntaa sopivaan sarakkeet, vakavia lopettaa lopussa ja MS Excel©.

Saatat joutua muuttamaan asetuksia MS Excel sugurança© suorittaa makroja, Tarvittaessa valitse Tools / Macro ja valitse Suojaus, valita alemman tason. Tämä oli kirjoitettu MS Excel© EM MS Windows XP© (sekä Portugalin versio). Jos käytät tätä koodia toisella kielellä, esim. Englanti, korvata termi "Sheet1’ por "Taul1’

Kun kaksoisnapsauttamalla tiedostoa xls2adi.xls, koodi juuri syöttämäsi toteutetaan ja sarake “ADIF RAW” on meidän Kirjaudu ADIF muodossa.

Nyt loppuun, valitse sarake sisältö “ADIF RAW” e Copie (Ctrl C), Käynnistä Muistio (Muistilehtiö) e cole (Ctrl V). Tallenna tiedosto pidentämisestä.

Tämä koodi näyte vapaasti käyttää, Voit vapaasti käyttää. Se on hyvin yksinkertainen esimerkki siitä, mitä voidaan tehdä vain VBA (Visual Basic for Applications). Täydentää tätä koodia vahvistusten kanssa tarkemman, erityisesti aloilla "qso_date’ e 'time_on ", missä muodoissa on ottelun erittely ADIF. Jos huomaat virheen tai on kysyttävää, älä epäröi kommentoida. Toivon artikkeli on hyötyä.

Tunnisteet: ,

Debianin asentamista NVIDIA-näytönohjaimet

On, toinen "Kuinka …’ ja jälleen NVIDIA, Erona on, että tämä toimii täydellisesti minulle (ei niin Debian ja Ubuntu ei).

Ensimmäinen suositus on vierailla sivustossa Lataa ajurit NVIDIA, Valitse malli kortti, OS (minun tapauksessani 32-bittinen Linux) e linguagem. A vaihtoehto 2 ei toimi Linuxissa. Klikkaa DOWNLOAD, kopioi linkin osoite on painike HYVÄKSYN & DOWNLOAD (jotain http://us.download.nvidia.com/XFree86/Linux-x86/190.53/NVIDIA-Linux-x86-190.53-pkg1.run).

Avaa terminaali ja kirjoita su siirtää juureen.

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

Tyyppi cd /usr/src pyytämään lintuja tähän hakemistoon.

Tyyppi ln -s linux-headers-$(uname -r) linux luoda symbolinen linkki.

Tyyppi wget ja klikkaa hiiren oikealla näppäimellä liitä linkki kopioit sivun NVIDIA (tulee asettua wget http://us.download.nvidia.com/XFree86/Linux-x86/190.53/NVIDIA-Linux-x86-190.53-pkg1.run).

Tyyppi /etc/init.d/gdm stop Tämä pysäyttää gdm ja siirtyy terminaaliin. Tästä eteenpäin on aiheellista osoittaa kyseinen artikkeli painettu, Se on ilman graafista ympäristöä.

Nyt on terminaali nopeasti syöttää cd /usr/src.

Sitten käynnistää asennuksen script kirjoittamalla NVIDIA sh NVIDIA-Linux-x86-190.53-pkg1.run.

Asennusohjelma pyytää sinua alkaa hyväksymään lisenssisopimuksen.

Vastaus NO kysymys ladata ydin NVIDIA.

Klikkaa OK kääntää uusi ydin.

Klikkaa NO klo viesti '… abort nyt ".

Anna asentajan ja valitse Jatka Kyllä mahdollistaa automaattisen päivityksen oman xorg.conf nvidia-xconfig.

Klikkaa OK ja kun Installer on valmis, Will stay again terminaalissa nopeasti, kirjoita startx aloittaa X-palvelin uudelleen.

Nyt voit muokata ratkaiseminen ja muut lisäasetuksia näytönohjain on NVIDIA X Server Settings apuohjelma, joka on System Tools-valikko (Järjestelmätyökalut).

Tunnisteet: , , ,

ASCII UTF-8-muunnin

ASC2UTF8 on pieni apuohjelma muuntaa joitakin erityisiä merkkejä ASCII UTF-8.

ASC 2 UTF-8 Converter

Valmistelussa, joidenkin taajuus, Tekstit sisällyttää PHP-skriptejä, tuli tarve kirjoittaa tätä apuohjelmaa Gambas2.

Kun työskentelee kahden tai useamman kielen yhtyä HTML ympäristöissä, kirjoittaa erikoismerkkejä voidaan mielenkiintoinen haaste. Käyttämällä META tag <meta http-equiv=Content-Type content="text/html; charset=UTF-8"> ja muuntotaulukko UTF-8 voi olla hyvä ratkaisu (tuloksena ainakin minulle). Apuohjelma ASC2UTF8 vain muuntaa joitakin erikoismerkkejä, jotka todella tarvitsevat muuntaa minulle faziam. O lähde voidaan helposti muuttaa muita erikoismerkkejä.

Tunnisteet: , ,

Como instalar O OpenOffice 3.1 Debian ei 5.0 Lenny

Debian Lenny defeito esitetty OpenOffice 2.6.4, Mutta OpenOffice 3.1 julkaistiin, asentaa vain yksinkertaisesti toimi seuraavasti:

  • Lisää arkistoon backports, root / etc / apt / sources.list ja lisää rivi deb http://www.backports.org/debian lenny-backports main contrib non-free
  • Avaa konsoli (Como root)
  • Instale o 'Debianin backports avaimenperä’ konekirjoitus apt-get install debian-backports-keyring
  • Päivitä paketti luettelo kirjoittamalla apt-get update
  • Por FIM instale O OpenOffice.org apt-get -t lenny-backports install openoffice.org

Ja valmis, tehdään. O OpenOffice.org 3.1 on asennettu ja käyttövalmis, digité "openoffice.org’ lohduttaa tai käyttää valikon "Sovellukset".

Tunnisteet: