nicht angemeldet
Hallo zusammen,
bin ein blutiger anfänger, was vbscript angeht und kenn mich deshalb auch noch nicht so gut damit aus! nun zu meiner frage...
wie bekomme ich das hin, dass mein vbscript ausgeführt wird, wenn ich einen button drücke?
Hier mal mein bisheriger sourcecode:
<html>
<title>test</title>
<head>
<script language="VBScript">
<!--
Function teste()
dim datei
dim xml
dim mainelement
dim feld
set xml = createobject("msxml2.domdocument")
if not xml.load ("\172.16.70.3\www\2\TestOrdner\vartest.xml") then
msgbox "XML-Daten konnte nicht geladen werden"
Stop
End If
set datei = getobject("\172.16.70.3\www\2\TestOrdner\VorlageNeu.doc")
set mainelement = xml.documentelement
setVariable "nameBearbeiter", mainelement.selectsinglenode("./nameBearbeiter").text
setVariable "bearbeiterID", mainelement.selectsinglenode("./bearbeiterID").text
setVariable "datum", mainelement.selectsinglenode("./datum").text
setVariable "callNr", mainelement.selectsinglenode("./callNr").text
setVariable "callGeber", mainelement.selectsinglenode("./callGeber").text
setVariable "summary", mainelement.selectsinglenode("./summary").text
for each feld in datei.fields
feld.update
Next
datei.Application.Visible = True
sub setVariable(VarName, Wert)
On Error Resume Next
datei.Variables.Item(VarName).Value = Wert
If Err.Number <> 0 Then
datei.variables.add VarName, Wert
end If
End Sub
End Function
-->
</script>
</head>
<body>
<input type="button" value="testbutton" onClick='teste()'>
</body>
</html>
Folgender Fehler tritt beim drücken auf den button auf:
Typen unverträglich: 'teste'
danke für eure hilfe!