Centar za edukaciju-BiH



#11 09.11.2014 14:34
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: VB.NET Cod vo VB6 Cod
Mozes otvoriti i novu temu u forumu arhiva i opet stavi link onda iz ove teme ocx idll.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#12 10.11.2014 19:18
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: VB.NET Cod vo VB6 Cod
Ima sansi ovaj Dot.Net cod da go napravime vo VB6 ili VBA ? Jas ne znam kako .
↑  ↓

#13 10.11.2014 22:20
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,611


Predmet:Re: VB.NET Cod vo VB6 Cod
Napravi on tlb file ali u njemu nema niste.
Pogledaj u object browser.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#14 12.11.2014 22:12
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: VB.NET Cod vo VB6 Cod
Ne znam jas sto treba da ima vo toj tlb file ? Ovaj tlb fajl moze da se ucita vo vb , a dali funkcionira ne znam
↑  ↓

#15 02.02.2015 12:03
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: VB.NET Cod vo VB6 Cod
Posle malku barajne prijateli uspeav da dojdam do dokument vo koj e navedena specifikacijata po koja e praven gorenavedeniot Dll. Ova Dll e napraveno vo Dot.Net tehnnologija i koristi NetFramevork 3.5 SP1.
Jas napraviv eden primer vo VB2010 no ova dll ima nekakva mana i nekako cudno se odnesuva.
Eve ja specifikacijata po koja e praven ovaj Dll e sega dali mozi da mi pomognete da napravime procedura po ovaa specifikacija za komunikacija na kasata so kompjuter.

Prilozi:
Informacije o tipu datoteke za:doc  Fiscal Printer dialog.doc
Preuzimanja:380
Velicina datoteke:79.5 KB

↑  ↓

#16 02.02.2015 15:52
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: VB.NET Cod vo VB6 Cod
Å to ti treba pomoći ?
Dali želiÅ¡ od tog dll. kroz vs2010 napraviti ocx kontrolu da ti radi u access-u ili je dll več napisan za koriÅ¡tenje u vb6,VBA ?
Ako želiÅ¡ da integriraÅ¡ dll u access kroz neke funkcije to ti mogu poslati kod ali ako je već napisan kod za VBA pogledaj koje koji su ti ulazni ii izlazni parametri kroz 'dim oas object set o = dll pa dalje.
Gore si napisao registraciju dll-a kroz regasm.exe
32 bita
%SystemRoot%\Microsoft.NET\Framework\v2.0.50727\regasm.exe C:\neki.dll /codebase /tlb
%SystemRoot%\Microsoft.NET\Framework\v4.0.30319\regasm.exe C:\neki.dll /codebase /tlb
64 bita
Framework64\v2.0.50727\RegAsm.exe
Framework64\v4.0.30319
Naravno za win 7 ,8 moraš UAC spustiti na low level za 64 bita
još u regedit
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System]
"EnableLUA"=dword:00000000
↑  ↓

#17 02.02.2015 16:27
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: VB.NET Cod vo VB6 Cod
Eve vaka :
Jas ne sakam da go koristam ova dll bidejki ne moze da se ubaci vo VB i VBA .
Uspeav da nabavam specifikacija po koja e praven ovaj dll i sega sakam vrz osnova na ovaa specifikacija da napravam funkcija koja ke ja koristam vo programot kako zamena za ova dll odnosno preku ovaa funkcija treba da se stampaat fiskalni racuni dnevni izvestai i drugo.

Ovie kasi koristat COM porta za komunikacija.
Com Portata ne mi e problem problem mi se redosledot na comandite koi gi isprakame na fiskalnata kasa
↑  ↓

#18 02.02.2015 17:52
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: VB.NET Cod vo VB6 Cod
Funkcijata bi izgledala slicno na ova
PreuzmiIzvorni kôd (Visual Basic):
  1. Public Function FiskalnaPrint()
  2.    
  3.     Open "COM1:115200,N,8,1" For Output As #1
  4.    
  5.    
  6.     Print #1, "1/8"
  7.     Print #1, "2/S/P/123/1.000/1000"
  8.     Print #1, "3/S/Bread//1.000/1000/1/1/0"
  9.     Print #1, "4/12.00/0/0/0"
  10.    
  11.     Close #1
  12.  
  13. End Function

Samo mene mi treba nekoj da go razgleda upatstvoto bidejki jas nemam mnogu iskustvo so pravejne na vakov tip na komunikacija
↑  ↓

#19 03.02.2015 17:38
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: VB.NET Cod vo VB6 Cod
Serial Port Communication Script

OVO TI RADI

http://dev.emcelettronica.com/...-excel-vba
↑  ↓

#20 03.02.2015 17:48
roko Van mreze
Clan
Registrovan od:02.02.2009
Postovi:236


Predmet:Re: VB.NET Cod vo VB6 Cod
A za tvoj primjer možeš i manje koda

dodaj si Microsoft Comm Control ana formu MSCOMM_neki

With MSCOMM_neki
.Handshaking = 2 - comRTS
.RThreshold = 1
.RTSEnable = True
.Settings = "9600,n,8,1"
.SThreshold = 1
.PortOpen = True
' Leave all other settings as default values.
End With

Private Sub MSComm_neki _OnComm()
Dim InBuff As String

Select Case MSComm_neki .CommEvent
Case comEventBreak ' A Break was received.
Case comEventCDTO ' CD (RLSD) Timeout.
Case comEventCTSTO ' CTS Timeout.
Case comEventDSRTO ' DSR Timeout.
Case comEventFrame ' Framing Error.
Case comEventOverrun ' Data Lost.
Case comEventRxOver ' Receive buffer overflow.
Case comEventRxParity ' Parity Error.
Case comEventTxFull ' Transmit buffer full.
Case comEventDCB ' Unexpected error retrieving DCB]

' Events
Case comEvCD ' Change in the CD line.
Case comEvCTS ' Change in the CTS line.
Case comEvDSR ' Change in the DSR line.
Case comEvRing ' Change in the Ring Indicator.
Case comEvReceive ' Received RThreshold # of chars.
InBuff = MSComm_neki .Input
Call HandleInput(InBuff)
Case comEvSend ' There are SThreshold number of
' characters in the transmit buffer.
Case comEvEOF ' An EOF character was found in the
' input stream.
End Select

End Sub

Sub HandleInput(InBuff As String)

msgbox InBuff
End Sub

Provaj pa vidi Å¡to ti vrača dll pa napiÅ¡i errors i Events
↑  ↓

Stranice (3):1,2,3

Sva vremena su GMT +01:00. Trenutno vrijeme: 9: 20 am.