|
A DTS Programming Example in HTML ASP/VBScript
You may download the original source file from here.
|
| |||||||||
<HTML>
<!-- Example DTS front-end application
Perform a simple query to the remote handler HELLO
using the DTS component interface and
Microsoft ASP scripting (VBScript)
Language: HTML ASP/VBScript
Intented for: DTS component interface
Date: 23-FEB-2000
-->
<%
Set DTS = Server.CreateObject("Tascomm.DTS")
SmallMessage = DTS.Call("REMOTE","01","HELLO","TestProgram")
If DTS.WasUnsuccessful(SmallMessage) Then
ReplyText = "Call failed: "+SmallMessage
Else
ReplyText = "Message received: "+Mid(SmallMessage,2)
End If
%>
<HEAD><TITLE>Example DTS front-end application</TITLE></HEAD>
<BODY>
<PRE><%= Server.HTMLEncode(ReplyText)%></PRE>
</BODY>
</HTML>
| ||||||||||
|