uk2015: HTA - Cursorposition im Textfeld ermitteln

Beitrag lesen

SELF-Forum

HTA - Cursorposition im Textfeld ermitteln

uk2015
+1 Informationen zu den Bewertungsregeln

Hallo,

mein Problem habe ich jetzt anders gelöst. Wenn es interessiert, zur Kenntnis meine Lösung (Split des Pfades und Hinterlegung der Teilpfade in aneinandergereiten span's - Maskierung strikt einhalten!) ... Für Ideen zur Ermittlung der Cursorposition wäre ich jedoch trotzdem noch dankbar.

<html>
<head>
<title>VerzEbene</title>
<script type="text/VBScript">
Sub ClickPfad (Pfad)
Dim strPfad, strPfadGes
'	MsgBox Pfad
	strPfad=""
	strPfadGes = ""
	a=Split(Pfad,"\")
	for each x in a
		If x <> "" then
			strPfadGes = strPfadGes & x & "\"
			strPfad = strPfad & "<span onClick=""ClickPfad ('" & strPfadGes & "')"" title=""" & strPfadGes & """>" & x & "\</span>"
'			MsgBox x & "-" & strPfad
		End If
	next
	strPfad = strPfad & ""
	spanPfad.InnerHTML = strPfad
End Sub
</script>
</head>
<body>
<form name="Form1">
	<table name="table1" style="border:2;border-style:inset;width:100%">
		<TR><TD style="border:1" width="100%">
		<span id="spanPfad" style="color:blue;cursor:hand"></span>
		</TD>
	</table>
</form>
</body>
</html>
<script type="text/VBScript">
	ClickPfad ("C:\VerzEbene1\VerzEbene2\VerzEbene3\")
</script>
Beitrag melden
+1
Informationen zu den Bewertungsregeln