เข้าสู่ระบบแปลงไฟล์ Excel เพื่อ ADIF

กระบวนการของการแปลงจากบันทึก MS Excel ของ© เพื่อ ADIF ที่ค่อนข้างง่ายและสามารถทำได้โดยใช้บิตของการเขียนโปรแกรม VBA. ผ่านช่องทางนี้ เชื่อมโยง สามารถอ้างอิงถึงข้อกำหนดของ ADIF 1.0 ซึ่งถูกใช้โดยการเข้าสู่ระบบมากที่สุด, เป็นสิ่งสำคัญที่คุณอ่านเอกสารฉบับนี้.

เพื่อเริ่มกระบวนการแปลงขึ้นอยู่กับการเริ่มต้นการกวดวิชานี้โดยการสร้างแฟ้มใน MS Excel©. ในผ้าลินินแรกที่เขียนชื่อของเขตข้อมูลที่คุณจะต้องการนำเข้า (กรุณาตรวจสอบ ADIF 1.0 จากชื่อของเขตข้อมูล). แม้ในบรรทัดแรก, ประเภท “RAW ADIF” เซลล์สุดท้าย, นี้เป็นที่ที่ข้อความจะถูกเขียนใน ADIF.

แผ่นงานที่จะมีลักษณะเช่นนี้ (แต่ก็ยังไม่มีข้อมูลในบรรทัด 2). แม้ว่ารูปแบบ ADIF ไม่ได้ระบุจำนวนขั้นต่ำของเขตข้อมูล, อย่างน้อยเข้าสู่ระบบ QSO ของคุณต้องมีค่าที่จะโทร, QSO_Date, Time_On, โหมด e - band.

จากนั้นให้เลือกทั้งแผ่นงานและจัดรูปแบบเซลล์เป็นข้อความ.

บันทึกแฟ้มเป็น xls2adi.xls (แผ่นงานใน MS Excel©)

ให้เราตอนนี้การเขียนและการใส่รหัสใน VBA. ไปที่ Tools / Macro และคลิกที่แก้ไข Visual Basic (Alt F11).

ในการแก้ไข VBA ThisWorkbook ดับเบิลคลิก '’ ที่อยู่ในโครงการ – 'VBAProject. ซึ่งเป็นที่ที่คุณจะได้รับ block หลักของรหัสที่จะทำงานเมื่อคุณเปิดแฟ้มนี้อีกครั้ง.

บล็อกของรหัสที่เป็นไปตามกำหนดตัวแปรบางอย่างและการเรียกฟังก์ชั่น fCampoAdifValido (บรรทัด 05) ที่จะตรวจสอบว่าชื่อเขตข้อมูลที่อยู่บนบรรทัดแรกที่สอดคล้องกับข้อกำหนดของ ADIF ที่. ถ้าทั้งหมดที่ชื่อเขตข้อมูลที่มีฟังก์ชั่นที่ถูกต้องเรียก pEscreveAdif ขั้นตอนที่ (บรรทัด 09) จะเขียนบันทึกใน ADIF, ถ้าเขตข้อมูลที่มีชื่อที่ไม่ถูกต้องฟังก์ชันที่แสดงข้อความแสดงข้อผิดพลาด (บรรทัด 07) และสิ้นสุด.

คัดลอก / วางหรือพิมพ์รหัสต่อไปนี้:

 

ส่วนตัว Workbook_Open Sub()
  เป็น Boolean มซำ bNomeDoCampoValido
  (conLinhaInicial)
  sUltimaColuna = fQualEAUltimaColuna(conColunaInicial)
  bNomeDoCampoValido = fCampoAdifValido(conColunaInicial, sUltimaColuna)
    ถ้า bNomeDoCampoValido = เท็จแล้ว
       ("พบชื่อของเขตข้อมูลที่ไม่ถูกต้อง" & vbCrLf & "เอาคอลัมน์ที่เต็มไปด้วยสีแดง!")
    อื่น
      

ในการแก้ไข VBA คลิกแทรก / โมดูล. ในโมดูลนี้จะเป็นรหัสที่เหลืออยู่ที่เรียกว่าบล็อกหลัก.

ค่าคงที่ conLinhaInicial (บรรทัด 02 บล็อกถัดไป) และ conColunaInicial (บรรทัด 03 บล็อกถัดไป) บรรทัดที่กำหนด 2 (สเปรดชีท) มีการลงทะเบียนครั้งแรกและที่คอลัมน์ (สเปรดชีท) ที่เขตข้อมูลแรก.

fQualEAUltimaLinha ฟังก์ชั่น (บรรทัด 08 บล็อกถัดไป) และ fQualEAUltimaColuna (บรรทัด 17 บล็อกถัดไป) จะเป็นตัวกำหนดแถวสุดท้ายและข้อมูลในคอลัมน์. นี้ต้องใช้เซลล์ที่ว่างเปล่าหมายถึงการสิ้นสุดของการบันทึกเข้าสู่ระบบ.

fCampoAdifValido ฟังก์ชัน (บรรทัด 05 บล็อกก่อนหน้านี้) การทดสอบความถูกต้องของชื่อเขตข้อมูล. กรณี sNomeDoCampo วงจร 'เลือก’ (บรรทัด 31 บล็อกถัดไป) เขตข้อมูลที่จะสามารถเพิ่มตามข้อกำหนดของ ADIF ที่.

pEscreveAdif ขั้นตอน (บรรทัด 09 บล็อกก่อนหน้านี้) จะเขียนข้อความในคอลัมน์ที่มี ADIF “RAW ADIF” บรรทัดแรก. ขั้นตอนนี้จะนำมาจากเขต Ifen QSO_DATE, จุดสองจุดของเขตข้อมูลและเพิ่ม M TIME_ON ที่ส่วนท้ายของวงเขตข้อมูลที่. นี้เพื่อให้แมโครมากขึ้นสามารถกำหนดเงื่อนไขที่เข้มงวดมากขึ้นสำหรับการตรวจสอบข้อมูลในขั้นตอนนี้.

คัดลอก / วางหรือพิมพ์รหัสต่อไปนี้ภายในโมดูล:

 

ตัวเลือกที่ชัดเจน
 2
Const สาธารณะ conColunaInicial As String = "A"
As Integer สาธารณะ iUltimaLinha
(iPrimeiraLinha As Integer) As Integer
  (Folha1.Cells(iValRecebido, "A")) > 0
      iValRecebido iValRecebido = + 1
    ห่วง
   - 1
ฟังก์ชั่น End

(sPrimeiraColuna String) String
  (sPrimeiraColuna)
    ทำในขณะที่ Len(Folha1.Cells(1, Chr(iValRecebido))) > 0
      iValRecebido iValRecebido = + 1
    ห่วง
  (iValRecebido - 1)
ฟังก์ชั่น End

(sPrimeiraColuna String, sUltimaColuna As String) บูลีน
  (sPrimeiraColuna) เพื่อเก่า(sUltimaColuna)
      LCase sNomeDoCampo =(Folha1.Cells(1, iColunaCorrente - 64))
      เลือกกรณี sNomeDoCampo
         "วงดนตรี": fCampoAdifValido = True
         "โทร": fCampoAdifValido = True
         "CQZ": fCampoAdifValido = True
         "โหมด": 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 ดิบ"
          fCampoAdifValido = True
           - 64
        กรณีที่คนอื่น
          (1, iColunaCorrente - 64).Interior.Color = RGB(255, 0, 0)
          fCampoAdifValido = เท็จ
        ()
  As Integer Dim iLinhaCorrente
   ""
    สำหรับ iColunaCorrente = Asc(conColunaInicial) เพื่อเก่า(sUltimaColuna) - 1
      ถ้า LCase(Folha1.Cells(1, Chr(iColunaCorrente))) = "วงดนตรี" แล้วก็
        (iLinhaCorrente, Chr(iColunaCorrente)) & "M"
      อื่น
        (Folha1.Cells(1, Chr(iColunaCorrente))) = "qso_date" แล้วก็
          (Folha1.Cells(iLinhaCorrente, Chr(iColunaCorrente)), "-", "")
        อื่น
          (Folha1.Cells(1, Chr(iColunaCorrente))) = "time_on" แล้วก็
            (Folha1.Cells(iLinhaCorrente, Chr(iColunaCorrente)), ":", "")
          อื่น
            (iLinhaCorrente, Chr(iColunaCorrente))
          End If
         & "<" & LCase(Folha1.Cells(1, Chr(iColunaCorrente))) & ":" & เท่านั้น(sTextoNaCelula) & ">" & sTextoNaCelula
    (iLinhaCorrente, iAdifRaw) = SLinhaEmAdif & "<" & "EOR" & ">"
  ต่อไป

 

คลิกที่ File / Save xls2adi.xls และปิดแก้ไข VBA.

ตอนนี้คัดลอกข้อมูลใน MS Excel ไฟล์ของคุณ© ที่คุณต้องการแปลงไปยังคอลัมน์ที่เหมาะสม, ร้ายแรงออกจากที่สิ้นสุดและ MS Excel©.

คุณอาจจำเป็นต้องเปลี่ยนการตั้งค่าสำหรับ MS Excel sugurança© เพื่อเรียกใช้แมโคร, ถ้าจำเป็นต้องไปที่ Tools / Macro และคลิกการรักษาความปลอดภัย, เลือกระดับที่ต่ำกว่า. นี้ถูกเขียนสำหรับ MS Excel© em MS Windows XP© (ทั้งในรุ่นโปรตุเกส). ถ้าคุณจะใช้รหัสนี้ในภาษาอื่น, เช่นในภาษาอังกฤษ, แทนที่คำว่า 'Sheet1’ por 'Sheet1’

เมื่อคุณดับเบิลคลิกที่ไฟล์ xls2adi.xls, รหัสที่คุณเพิ่งป้อนจะถูกดำเนินการและคอลัมน์ “RAW ADIF” เข้าสู่ระบบของเราอยู่ในรูปแบบ ADIF.

ตอนนี้ให้เสร็จสิ้น, เลือกเนื้อหาของคอลัมน์ “RAW ADIF” copie E (Ctrl C), เริ่มต้น Notepad (Notepad) โคลอี (Ctrl V). บันทึกไฟล์ที่มีนามสกุลเพิ่มเติมที่.

ตัวอย่างรหัสนี้มีอิสระที่จะใช้, คุณอิสระสามารถใช้. มันเป็นตัวอย่างที่ง่ายมากของสิ่งที่สามารถทำได้โดยใช้ VBA (Visual Basic สำหรับ Applications). ประกอบการตรวจสอบรหัสนี้กับความแม่นยำมากขึ้น, โดยเฉพาะอย่างยิ่งใน qso_date ฟิลด์ '’ 'time_on' E, ซึ่งรูปแบบจะต้องตรงกับข้อกำหนด ADIF. ถ้าคุณสังเกตเห็นข้อผิดพลาดหรือมีคำถามใด ๆ, ไม่ลังเลที่จะแสดงความคิดเห็น. ฉันหวังว่าบทความจะเป็นประโยชน์.

แท็ก: ,

การติดตั้ง Debian กราฟิกการ์ด NVIDIA

มันเป็น, อีก 'วิธีการ …’ และอีกครั้งในกราฟิกของ NVIDIA, คือความแตกต่างที่ว่านี้ทำงานอย่างสมบูรณ์แบบสำหรับฉัน (ไม่ได้ทั้ง Debian และ Ubuntu ไม่ได้).

คำแนะนำแรกคือการเข้าเยี่ยมชมเว็บไซต์ดาวน์โหลดไดรเวอร์ ของ NVIDIA, เลือกรูปแบบของบัตร, ระบบปฏิบัติการ (ในกรณีของฉัน 32 - bit Linux) e - linguagem. A ตัวเลือก 2 ไม่ทำงานสำหรับลินุกซ์. คลิกที่ ดาวน์โหลด, คัดลอกที่อยู่ลิงค์ที่อยู่บนปุ่ม ตกลง & ดาวน์โหลด (บางสิ่งบางอย่างเช่น HTTP://us.download.nvidia.com/XFree86/Linux-x86/190.53/NVIDIA-Linux-x86-190.53-pkg1.run).

เปิด terminal และประเภท su ที่จะผ่านราก.

ประเภท apt-get install build-essential linux-headers-$(uname -r).

ประเภท cd /usr/src เพื่อให้นกไปยังไดเรกทอรีนี้.

ประเภท ln -s linux-headers-$(uname -r) linux เพื่อสร้างการเชื่อมโยงสัญลักษณ์.

ประเภท wget และคลิกที่ปุ่มเมาส์ขวาวางการเชื่อมโยงที่คุณคัดลอกหน้าจาก NVIDIA (จะยืนเป็น wget http://us.download.nvidia.com/XFree86/Linux-x86/190.53/NVIDIA-Linux-x86-190.53-pkg1.run).

ประเภท /etc/init.d/gdm stop นี้จะหยุด gdm และส่งผ่านไปยังขั้ว. จากจุดนี้เป็นที่เหมาะสมที่จะมีการพิมพ์บทความนี้, มันจะไม่มีสภาพแวดล้อมแบบกราฟิก.

ตอนนี้ที่เป็นใน terminal ให้ใส่ cd /usr/src.

แล้วเปิดสคริปต์การติดตั้งโดยการพิมพ์ของ NVIDIA sh NVIDIA-Linux-x86-190.53-pkg1.run.

การติดตั้งขอให้คุณเริ่มต้นที่จะยอมรับข้อตกลงใบอนุญาต.

คำตอบ ไม่ คำถามเกี่ยวกับการดาวน์โหลดเคอร์เนลจาก NVIDIA ที่.

คลิกที่ ตกลง เพื่อคอมไพล์ kernel ใหม่.

คลิกที่ ไม่ ที่ข้อความ '… ยกเลิกตอนนี้'.

ให้ติดตั้งและเลือกดำเนินการต่อไป ใช่ เพื่อให้การปรับปรุงอัตโนมัติจาก xorg.conf ของคุณโดย NVIDIA - xconfig.

คลิกที่ ตกลง และเมื่อติดตั้งเสร็จสิ้น, จะพักอีกครั้งใน terminal ให้, จากนั้นใส่ startx เพื่อเริ่มต้นของ X server อีกครั้ง.

ตอนนี้คุณสามารถปรับความละเอียดและการตั้งค่าขั้นสูงอื่น ๆ สำหรับการ์ดแสดงผลกราฟิกด้วย NVIDIA เซิร์ฟเวอร์ X ยูทิลิตีการตั้งค่าที่อยู่ในระบบเมนูเครื่องมือ (เครื่องมือระบบ).

แท็ก: , , ,

ASCII เป็น UTF - 8 Converter

ASC2UTF8 เป็นสาธารณูปโภคที่มีขนาดเล็กเพื่อการแปลงตัวอักษรพิเศษบางอย่างจาก ASCII เป็น UTF - 8.

ASC 2 UTF-8 Converter

ในการเตรียมการ, และมีความถี่, ข้อความที่จะรวมไว้ในสคริปต์ PHP, มาจำเป็นต้องเขียนโปรแกรมอรรถประโยชน์นี้ใน Gambas2.

เมื่อทำงานร่วมกับสองภาษาหรือมากกว่าเพื่อสะท้อนในสภาพแวดล้อมที่ HTML, เขียนตัวอักษรพิเศษสามารถท้าทายที่น่าสนใจ. การใช้เมตาแท็ก <meta http-equiv=Content-Type content="text/html; charset=UTF-8"> และตารางการแปลงสำหรับ UTF - 8 อาจจะเป็นทางออกที่ดี (ส่งผลให้อย่างน้อยกับฉัน). ASC2UTF8 ยูทิลิตี้เท่านั้นที่แปลงอักขระพิเศษบาง, บรรดาผู้ที่จริงต้องแปลงฉัน faziam. O แหล่ง สามารถเปลี่ยนได้อย่างง่ายดายเพื่ออักขระพิเศษอื่น ๆ.

แท็ก: , ,

โคโม instalar OpenOffice o 3.1 Debian ไม่ได้ 5.0 Lenny

สำหรับ Debian Lenny defeito ที่ระบุไว้ใน OpenOffice 2.6.4, แต่ OpenOffice 3.1 ถูกปล่อยออกมา, การติดตั้งเพียงแค่ทำตามขั้นตอนเหล่านี้:

  • เพิ่มพื้นที่เก็บข้อมูล backports, เป็นรากแก้ไขไฟล์ / etc / apt / sources.list และเพิ่มบรรทัด deb http://www.backports.org/debian lenny-backports main contrib non-free
  • เปิดคอนโซล (como ราก)
  • Instale O 'backports Debian พวงกุญแจ’ การพิมพ์ apt-get install debian-backports-keyring
  • ปรับปรุงรายการแพคเกจโดยการพิมพ์ apt-get update
  • por FIM OpenOffice.org instale o apt-get -t lenny-backports install openoffice.org

และพร้อมที่, จะทำ. O OpenOffice.org 3.1 มีการติดตั้งและพร้อมใช้งาน, digite 'openoffice.org’ ปลอบใจหรือใช้ 'Applications' เมนู.

แท็ก: