miro35 30.08.2012 08:29
Predmet:Re: Iz Å kole VB-a

Ma gledo sam odgovor ali nisam ja stigo odgovorit.Ovo je odlična procedura ali tu treba napisati i za Å Å¡,Đđ,Žž,Ćć.
Samo da ti napomenem za ono moje pitanje za onu poruku kad radim sa bar kod čitačem ono kad me izbaci iz aplikacije(Baze) i javi D'not send poruku.To sam rjeÅ¡io kao Å¡to si ti napisao da isključim Microsoft activex 2.8 Object Library jer je ova referenca u konfliktu sa DAO referencama.Sačekao sam da vidim oće li i dalje biti problema ali sad za sad ih nema.Hvala ti na tome.Ovo sam napisao da i ostali vide kod kreiranja xml fajla koji problemi mogu nastati.Čak sam pokuÅ¡avao i sa .mde ali niÅ¡ta nije pomoglo,nego da se prepravi kod koji kreira xml fajl i da se ugasi ova referenca.Hvala joÅ¡ jednom.

zxz 30.08.2012 08:47
Predmet:Re: Iz Å kole VB-a

Kad stignem napravit cu proceduru koja mijenja nasa slova Å¡ u s đ u dj ž u z ć ič u c.
Ovako se nekad pisalo pisacom masinom.
Ja i danas pisem tako.

miro35 30.08.2012 10:33
Predmet:Re: Iz Å kole VB-a

Ja ću korisniku omogućiti da piÅ¡e naÅ¡a slova zbog A4 ispisa ali planiram da prepravljam prije kreiranja xml fajla i slanja na fiskalni pisač

zxz 30.08.2012 10:52
Predmet:Re: Iz Å kole VB-a

Jasno mi je sta hoces.
Imas neki printer koji ne podrzava noviju kodnu stranu nasu nego staru 852 i jedino rjesenje ti je da ne pises ova slova.
Naime moze se to napraviti.
Sad neznam napamet rasppored u kodnoj strani 852.
Treba naci brojeve asci i stavljati te znakove po kodnoj strani 1250.

miro35 30.08.2012 11:05
Predmet:Re: Iz Å kole VB-a

Tako je za UTF-8 imam funkciju koja pretvara i to uredno radi.To mi je za HCP fiskalne printere.
Za Tremol mi treba IBM-852. U pravu si kad bih znao ascii znakove za 852 možda bih ih mogao ugraditi u ovu funkciju za UTF-8

miro35 30.08.2012 11:07
Predmet:Re: Iz Å kole VB-a

To je ovaj DEKODER.ZIP Å¡to si i ti zakačio

zxz 30.08.2012 11:15
Predmet:Re: Iz Å kole VB-a

On pretvara kodnu stranu 1250 u UTF8 cini mi se.
Nama bi trebalo 1250 u 852.
Trebalo bi to malo prepraviti.

miro35 30.08.2012 13:23
Predmet:Re: Iz Å kole VB-a

Ja mislim da je tako znači da bi trebalo doći do ascci znakova za 852 ili kako se već zovu

miro35 30.08.2012 13:28
Predmet:Re: Iz Å kole VB-a

Mislim da ova funkcija u dekoderu to radi:
PreuzmiIzvorni kôd (Text):
  1. Function funConvert(bytOrg As Byte) As Integer
  2.  
  3.     If bytOrg >= 0 And bytOrg <= 127 Then
  4.         funConvert = bytOrg
  5.         Exit Function
  6.     End If
  7.    
  8.     Select Case bytOrg
  9.         Case &H80:
  10.             funConvert = &H20AC  'EURO SIGN
  11.         Case 129:
  12.             'UNDEFINED
  13.             MsgBox "Bad character"
  14.             funConvert = 0
  15.         Case &H82:
  16.             funConvert = &H201A  'SINGLE LOW-9 QUOTATION MARK
  17.         Case 131:
  18.             'UNDEFINED
  19.             MsgBox "Bad character"
  20.             funConvert = 0
  21.         Case &H84:
  22.             funConvert = &H201E  'DOUBLE LOW-9 QUOTATION MARK
  23.         Case &H85:
  24.             funConvert = &H2026  'HORIZONTAL ELLIPSIS
  25.         Case &H86:
  26.             funConvert = &H2020 'DAGGER
  27.         Case &H87:
  28.             funConvert = &H2021      'DOUBLE DAGGER
  29.         Case 136
  30.             'UNDEFINED
  31.             MsgBox "Bad character"
  32.             funConvert = 0
  33.         Case &H89:
  34.             funConvert = &H2030      'PER MILLE SIGN
  35.         Case &H8A:
  36.             funConvert = &H160       'LATIN CAPITAL LETTER S WITH CARON
  37.         Case &H8B:
  38.             funConvert = &H2039      'SINGLE LEFT-POINTING ANGLE QUOTATION MARK
  39.         Case &H8C:
  40.             funConvert = &H15A       'LATIN CAPITAL LETTER S WITH ACUTE
  41.         Case &H8D:
  42.             funConvert = &H164       'LATIN CAPITAL LETTER T WITH CARON
  43.         Case &H8E:
  44.             funConvert = &H17D       'LATIN CAPITAL LETTER Z WITH CARON
  45.         Case &H8F:
  46.             funConvert = &H179       'LATIN CAPITAL LETTER Z WITH ACUTE
  47.         Case 144:
  48.             'UNDEFINED
  49.             MsgBox "Bad character"
  50.             funConvert = 0
  51.         Case &H91:
  52.             funConvert = &H2018      'LEFT SINGLE QUOTATION MARK
  53.         Case &H92:
  54.             funConvert = &H2019      'RIGHT SINGLE QUOTATION MARK
  55.         Case &H93:
  56.             funConvert = &H201C      'LEFT DOUBLE QUOTATION MARK
  57.         Case &H94:
  58.             funConvert = &H201D      'RIGHT DOUBLE QUOTATION MARK
  59.         Case &H95:
  60.             funConvert = &H2022      'BULLET
  61.         Case &H96:
  62.             funConvert = &H2013      'EN DASH
  63.         Case &H97:
  64.             funConvert = &H2014      'EM DASH
  65.         Case 152:
  66.             'UNDEFINED
  67.             MsgBox "Bad character"
  68.             funConvert = 0
  69.         Case &H99:
  70.             funConvert = &H2122      'TRADE MARK SIGN
  71.         Case &H9A:
  72.             funConvert = &H161       'LATIN SMALL LETTER S WITH CARON
  73.         Case &H9B:
  74.             funConvert = &H203A      'SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
  75.         Case &H9C:
  76.             funConvert = &H15B       'LATIN SMALL LETTER S WITH ACUTE
  77.         Case &H9D:
  78.             funConvert = &H165       'LATIN SMALL LETTER T WITH CARON
  79.         Case &H9E:
  80.             funConvert = &H17E       'LATIN SMALL LETTER Z WITH CARON
  81.         Case &H9F:
  82.             funConvert = &H17A       'LATIN SMALL LETTER Z WITH ACUTE
  83.         Case &HA0:
  84.             funConvert = &HA0        'NO-BREAK SPACE
  85.         Case &HA1:
  86.             funConvert = &H2C7       'CARON
  87.         Case &HA2:
  88.             funConvert = &H2D8       'BREVE
  89.         Case &HA3:
  90.             funConvert = &H141       'LATIN CAPITAL LETTER L WITH STROKE
  91.         Case &HA4:
  92.             funConvert = &HA4        'CURRENCY SIGN
  93.         Case &HA5:
  94.             funConvert = &H104       'LATIN CAPITAL LETTER A WITH OGONEK
  95.         Case &HA6:
  96.             funConvert = &HA6        'BROKEN BAR
  97.         Case &HA7:
  98.             funConvert = &HA7        'SECTION SIGN
  99.         Case &HA8:
  100.             funConvert = &HA8        'DIAERESIS
  101.         Case &HA9:
  102.             funConvert = &HA9        'COPYRIGHT SIGN
  103.         Case &HAA:
  104.             funConvert = &H15E       'LATIN CAPITAL LETTER S WITH CEDILLA
  105.         Case &HAB:
  106.             funConvert = &HAB        'LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
  107.         Case &HAC:
  108.             funConvert = &HAC        'NOT SIGN
  109.         Case &HAD:
  110.             funConvert = &HAD        'SOFT HYPHEN
  111.         Case &HAE:
  112.             funConvert = &HAE        'REGISTERED SIGN
  113.         Case &HAF:
  114.             funConvert = &H17B       'LATIN CAPITAL LETTER Z WITH DOT ABOVE
  115.         Case &HB0:
  116.             funConvert = &HB0        'DEGREE SIGN
  117.         Case &HB1:
  118.             funConvert = &HB1        'PLUS-MINUS SIGN
  119.         Case &HB2:
  120.             funConvert = &H2DB       'OGONEK
  121.         Case &HB3:
  122.             funConvert = &H142       'LATIN SMALL LETTER L WITH STROKE
  123.         Case &HB4:
  124.             funConvert = &HB4        'ACUTE ACCENT
  125.         Case &HB5:
  126.             funConvert = &HB5        'MICRO SIGN
  127.         Case &HB6:
  128.             funConvert = &HB6        'PILCROW SIGN
  129.         Case &HB7:
  130.             funConvert = &HB7        'MIDDLE DOT
  131.         Case &HB8:
  132.             funConvert = &HB8        'CEDILLA
  133.         Case &HB9:
  134.             funConvert = &H105       'LATIN SMALL LETTER A WITH OGONEK
  135.         Case &HBA:
  136.             funConvert = &H15F       'LATIN SMALL LETTER S WITH CEDILLA
  137.         Case &HBB:
  138.             funConvert = &HBB        'RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
  139.         Case &HBC:
  140.             funConvert = &H13D       'LATIN CAPITAL LETTER L WITH CARON
  141.         Case &HBD:
  142.             funConvert = &H2DD       'DOUBLE ACUTE ACCENT
  143.         Case &HBE:
  144.             funConvert = &H13E       'LATIN SMALL LETTER L WITH CARON
  145.         Case &HBF:
  146.             funConvert = &H17C       'LATIN SMALL LETTER Z WITH DOT ABOVE
  147.         Case &HC0:
  148.             funConvert = &H154       'LATIN CAPITAL LETTER R WITH ACUTE
  149.         Case &HC1:
  150.             funConvert = &HC1        'LATIN CAPITAL LETTER A WITH ACUTE
  151.         Case &HC2:
  152.             funConvert = &HC2        'LATIN CAPITAL LETTER A WITH CIRCUMFLEX
  153.         Case &HC3:
  154.             funConvert = &H102       'LATIN CAPITAL LETTER A WITH BREVE
  155.         Case &HC4:
  156.             funConvert = &HC4        'LATIN CAPITAL LETTER A WITH DIAERESIS
  157.         Case &HC5:
  158.             funConvert = &H139       'LATIN CAPITAL LETTER L WITH ACUTE
  159.         Case &HC6:
  160.             funConvert = &H106       'LATIN CAPITAL LETTER C WITH ACUTE
  161.         Case &HC7:
  162.             funConvert = &HC7        'LATIN CAPITAL LETTER C WITH CEDILLA
  163.         Case &HC8:
  164.             funConvert = &H10C       'LATIN CAPITAL LETTER C WITH CARON
  165.         Case &HC9:
  166.             funConvert = &HC9        'LATIN CAPITAL LETTER E WITH ACUTE
  167.         Case &HCA:
  168.             funConvert = &H118       'LATIN CAPITAL LETTER E WITH OGONEK
  169.         Case &HCB:
  170.             funConvert = &HCB        'LATIN CAPITAL LETTER E WITH DIAERESIS
  171.         Case &HCC:
  172.             funConvert = &H11A       'LATIN CAPITAL LETTER E WITH CARON
  173.         Case &HCD:
  174.             funConvert = &HCD        'LATIN CAPITAL LETTER I WITH ACUTE
  175.         Case &HCE:
  176.             funConvert = &HCE        'LATIN CAPITAL LETTER I WITH CIRCUMFLEX
  177.         Case &HCF:
  178.             funConvert = &H10E       'LATIN CAPITAL LETTER D WITH CARON
  179.         Case &HD0:
  180.             funConvert = &H110       'LATIN CAPITAL LETTER D WITH STROKE
  181.        
  182.     End Select
  183.  
  184.  
  185. End Function

zxz 30.08.2012 20:35
Predmet:Re: Iz Å kole VB-a

Eh ova procedura obradju sve sto se tice ispisa pod dosom.
Eh sad koja je kodna strana to bi trebalo provjeriti i dali uopste obuhvata va slova.
Vidim da obuvata neka i ostalo je vrsta ispisa.