Hi @ all,
Ich habe eine M�glichkeit gefunden via ActiveX remote eine Wordvorlage zu
�ffnen...aber... Das funktioniert scheinbar nur, wenn man die HTM Seite direkt mit
einem Doppelklick �ffnet und KEINEN IIS dazwischenhat. Ich bin ein wenig verwundert,
denn auch das Ausgeben der Aufruf-Seite per Response.Redirect oder Response.Write
funktioniert nicht. Das bedeutet, die Seite selber wird korrekt angezeigt, aber die
ActiveX-Komponente funktioniert nicht.
Ich weiss das ist eine nicht ganz reine ASP Frage, aber mir geht es ja um die Ausgabe
per ASP.
Meine Active X Komponente sieht so aus:
1. als HTML
<HTML>
<HEAD> <SCRIPT LANGUAGE="vbscript">
function getdocument(str)
Set wshshell = CreateObject("WScript.Shell")
wshshell.run "winword /t\\re03\c$\temp\"&str&".dot"
end function
</SCRIPT>
</HEAD>
<BODY>
<P>Please Select a document: </P>
<FORM>
<P>
<SELECT NAME="List" SIZE="1" ONCHANGE="getdocument(List.value)">
<OPTION VALUE="test1" SELECTED="SELECTED">Document 1</OPTION>
<OPTION VALUE="test2">Document 2</OPTION>
<OPTION VALUE="test3">Document 3</OPTION>
</SELECT></P></FORM> </BODY>
</HTML>
2. als ASP
<% @ Language="VBScript" EnableSessionState ="False"%>
<%
Response.Buffer=True
Response.Clear
'option explicit
Response.Write "<HTML>" & VBCRLF &_
" <HEAD>" & VBCRLF &_
"<script language="&"""vbscript""> " & VBCRLF &_
"function getdocument(str)" & VBCRLF &_
"Set wshshell = CreateObject("&"""WScript.Shell"""&")" & VBCRLF &_
"wshshell.run 'winword /t\\192.168.169.1\c$\"&str&".dot'" & VBCRLF &_
"end function" & VBCRLF &_
"</script>" & VBCRLF &_
"</HEAD>" & VBCRLF &_
" <BODY>" & VBCRLF &_
" <P>Please Select a document: </P>" & VBCRLF &_
" <FORM>" & VBCRLF &_
" <P>" & VBCRLF &_
" <SELECT NAME='List' SIZE='1' ONCHANGE='getdocument(List.value)'>" &
VBCRLF &_
" <OPTION VALUE='test1' SELECTED='SELECTED'>Document
1</OPTION>" & VBCRLF &_
" <OPTION VALUE='test2'>Document 2</OPTION>" & VBCRLF &_
" <OPTION VALUE='test3'>Document 3</OPTION>" & VBCRLF &_
" </SELECT></P></FORM> </BODY>" & VBCRLF &_
"</HTML>" & VBCRLF
%>
Danke Gruss Dominik
---------------------------------------\|/-------
CUS Information Technology GmbH-------(o o)------
------------------------------ ----ooO-(_)-Ooo---
Jostesweg 7
49080 Osnabrueck - Germany
phone +49 (0) 541 982 77 77
fax +49 (0) 541 982 77 78
Blumenhaller Weg 47
49080 Osnabrueck - Germany
phone +49 (0) 541 961 91 19
-------------------------------------------------
http://www.CUS-IT.Net
-------------------------------------------------
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
