--------------------------------------------------------------------------------
Hallo zusammen...
Ich habe ein Problem mit einem Etikettendrucker.. Dieser soll per VBscript über eine Webseite Drucken. Dafür habe ich folgendes script:
<HTML>
<HEAD>
<script LANGUAGE=VBscript>
Sub Btn1_onclick()
Dim DymoAddIn, DymoLabel
Set DymoAddIn = CreateObject("DYMO.DymoAddIn")
Set DymoLabel = CreateObject("DYMO.DymoLabels")
DymoAddIn.Open "C:\Programme\DYMO Label\Label Files\Adresse - Grafik (99010).lwl"
DymoAddIn.Print 1, TRUE
End Sub
</script>
<TITLE>Label Printing Demo</Title>
</HEAD>
<BODY>
<Bold>Label Printing Demo</Bold><p>
<INPUT TYPE=BUTTON NAME=Btn1 VALUE="Print Label">
</BODY>
</HTML>
Jetzt druckt er mir eine Datei die in dem oben genannten Pfad liegt. Die Daten sind aber statisch.. Das script ist ein Beispiel script von dem Drucker Hersteller. Ich brauch jetzt auf der Webseite mit dem Button eigentlich ein Textfeld in das ich Daten aus einer Datenbank hineinschreibe und diese dann drucke. Jetzt hab ich noch ein script was glaub ich etwas ähnliches bewerkstelligt.
Public Function PrintAddress()
'*********************************************************************************
'* This function uses high-level OLE to have VB communicate with Dymo Label *
'* Software. It uses the PrintAddress sample form in VB to print out the Address*
'* on the "Address, Large (30321)" label in Dymo Label Software. *
'*********************************************************************************
Dim q
Dim LabelFile As String
Sub Btn1_onclick()
LabelFile = "C:\Programme\DYMO Label\Label Files\Adresse - Grafik (99010).lwl"
' Create Dymo OLE objects.
Call CreateOLEObjects
' Open the "Address, Large (30321)" template in Dymo Label Software(DLS).
DymoAddIn.Open (LabelFile)
' Set the text of the label with the entry in the Address text box of the
' PrintAddress sample form. Then Print the entry.
DymoLabels.SetField "Address", Address_Text.Text
q = DymoAddIn.Print(1, True)
' Destroy Dymo OLE objects.
Call DestroyOLEObjects
End Function
Ich weiss micht wie ich das zusammenkriege.. Hat jemand ne Idee???
