Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

POS printer Samsung SRP-270A i print iz aplikacije...

[es] :: Visual Basic 6 :: POS printer Samsung SRP-270A i print iz aplikacije...

[ Pregleda: 4155 | Odgovora: 8 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

n_e_0
hr

Član broj: 116627
Poruke: 14
*.hep.hr.



Profil

icon POS printer Samsung SRP-270A i print iz aplikacije...01.02.2007. u 14:22 - pre 209 meseci
Printer je serijski (COM1) i radi, ali...
Uz drivere dolazi komad VB koda koji printa račun, ali ne radi kako treba - svaki račun ispada drukčije.
Zamjeni slova, ali bez pravila, na jednom računu je a=e, na sljedećem istom tom računu e=a.
Pokušao sam s original driverima, sa generic, kopirati txt file na COM1 i svaki put dobijem ja račun, ali nikako da bude kako treba.

Jel može pomoć, malo je hitno?

Hvala
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
*.beobug.com.



+7 Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...04.02.2007. u 10:52 - pre 209 meseci
Jel mozes da posaljes / zakacis taj Vb program.
Ja imam jedan Vb program (ne trebaju drajveri) koji dobro radi na mom Epsonovom termo printeru (COM).
Ovako mogu samo da ti kazem da je vazna brzina kojom se podatci salju na port.
Pozdrav
 
Odgovor na temu

n_e_0
hr

Član broj: 116627
Poruke: 14
*.hep.hr.



Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...05.02.2007. u 06:47 - pre 209 meseci

Program izgleda ovako (iskomentirao sam dio sa printom slike jer mi ne treba a i ne radi nikako):

For Each prnPrinter In Printers
If prnPrinter.DeviceName = "SAMSUNG SRP-270" Then
Set Printer = prnPrinter
Exit For
End If
Next

If Printer.DeviceName = "SAMSUNG SRP-270" Then
Printer.Font.Size = 9
Printer.FontName = "FontControl"
Printer.Print "x"

Printer.Font.Size = 9
Printer.FontName = "FontA2x1"

Printer.Font.Bold = True
Printer.Print "* Joshua Cafe *" + vbCrLf
Printer.Font.Bold = False

Printer.Font.Size = 9
Printer.FontName = "FontControl"
Printer.Print "w"

Printer.Font.Size = 9
Printer.FontName = "FontA1x1"

Printer.Print " 3000 Spring Street, Rancho,"
Printer.Print " California 10093,"
Printer.Print " Tel) 858-519-3698 Fax) 3852"

Printer.Print vbCrLf + "---------------------------------" 'LF
Printer.Print "Orange Juice 5.00"
Printer.Print "6 Bufalo Wing 24.00"
Printer.Print "Potato Skin 12.00"
Printer.Font.Bold = True
Printer.ForeColor = RGB(255, 0, 0)
Printer.Print "Subtotal 41.00"
Printer.ForeColor = RGB(0, 0, 0)
Printer.Font.Bold = False

Printer.Print "Tax 6% 2.46"
Printer.Font.Bold = True
Printer.ForeColor = RGB(255, 0, 0)
Printer.Print "Member Discount 2.30"
Printer.ForeColor = RGB(0, 0, 0)
Printer.Font.Bold = False

Printer.Font.Bold = True
Printer.Print "Cash 100.00"
Printer.Print "Amt. Paid 41.16"
Printer.Font.Bold = False
Printer.Font.Bold = True
Printer.ForeColor = RGB(255, 0, 0)
Printer.Print "Change Due 58.84"
Printer.ForeColor = RGB(0, 0, 0)
Printer.Font.Bold = False
Printer.Print "---------------------------------"

'Printer.Font.Size = 9
'Printer.FontName = "FontControl"
'Printer.Print "x"

Printer.Font.Size = 9
Printer.FontName = "FontA1x1"
Printer.Print "Member Number : 452331949" + vbCrLf 'sredina

Printer.Font.Size = 9
Printer.FontName = "FontA1x1"
Printer.Font.Bold = True
Printer.Print "Have a nice day !" + vbCrLf
Printer.Font.Bold = False

Printer.Print "Sale Date: 07/01/03"
Printer.Print "Time: 12:30:45"

Printer.Font.Size = 9
Printer.FontName = "FontControl"
Printer.Print "w"

'Dim pic As Picture

'Set pic = LoadPicture(App.Path & "\free5_100.bmp")

'Printer.CurrentX = 60
'Printer.CurrentY = 5000
'Printer.PaintPicture pic, Printer.CurrentX, Printer.CurrentY
'Printer.CurrentY = Printer.CurrentY + pic.Height

'Set pic = LoadPicture(App.Path & "\cafeblue208.bmp")
'Printer.PaintPicture pic, Printer.CurrentX, Printer.CurrentY

Printer.CurrentX = 0
Printer.CurrentY = 9000
Printer.Font.Size = 9
Printer.Font.Name = "FontControl"
Printer.Print "g"

Printer.EndDoc
Else
MsgBox "SRP-270 windows driver don't installed"
End If


 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
*.beobug.com.



+7 Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...05.02.2007. u 09:02 - pre 209 meseci
Ovo je VB 6 program za stampanje preko comm porta (dez draivera). Radi na mom Epsonovom termo printeru. Promeni comm port (1,2) u programu na onaj gde ti je printer zakacen. Kad je povezan lampice su zelene.
Prikačeni fajlovi
 
Odgovor na temu

n_e_0
hr

Član broj: 116627
Poruke: 14
*.hep.hr.



Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...05.02.2007. u 10:55 - pre 209 meseci
Prilikom otvaranja porta, javlja grešku:
Could not set comm state, there may be one or more invalid communications parameters.
 
Odgovor na temu

Fuzz
Bojan Vukovic
Novi Sad

Član broj: 8631
Poruke: 3866
*.dialup.neobee.net.



+9 Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...05.02.2007. u 12:48 - pre 209 meseci
99% je problem se regionalnim podesavanjima i kodnim rasporedom.
anti-heroin spree
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
*.com
Via: [es] mailing liste



+7 Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...05.02.2007. u 17:04 - pre 209 meseci
Neni taj program radi kad u Comm Port >> Settings postavim Comm port na 2
(posto mi je stampac na tom portu) a Settings u tom prozoru mi je
19200,n,8,1 . Prvi parametar je brzina
Probaj da stavis 9600,n,8,1 (to je defaultna brzina) ili neki drugi port
Pozdrav
 
Odgovor na temu

n_e_0
hr

Član broj: 116627
Poruke: 14
*.hep.hr.



Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...06.02.2007. u 11:41 - pre 209 meseci
neće ni na 9600
 
Odgovor na temu

Eurora3D Team
Nebojsa - Programer & Vodja tima
Beograd

Član broj: 120376
Poruke: 900
*.com
Via: [es] mailing liste



+7 Profil

icon Re: POS printer Samsung SRP-270A i print iz aplikacije...06.02.2007. u 17:42 - pre 209 meseci
Onda ne znam
Meni taj program otvara oba Comm porta koja imam i onaj sa printerom i onaj
gde nema nista.
Jesi 100% siguran da ti je printer OK ili proveri jel se isto desava na Svim
Comm portovima koje imaš.
Taj program je malo izmenjen Microsoft primer koriscenja MSComm ActiveX
kontrole a njihovi primeri su standardno kvalitetni i provereni.
Inace,sigurno znam da je za comm stampace mnogo brze da stampaju ovako nego
preko drajvera.
Mozda ti jos neko da neku ideju.
Pozdrav.
 
Odgovor na temu

[es] :: Visual Basic 6 :: POS printer Samsung SRP-270A i print iz aplikacije...

[ Pregleda: 4155 | Odgovora: 8 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.