Hi
I've created a Vb Dll and I'm creating the object from an asp, everything work's fine when I'm using one asp to collected the data and send it to the other asp but when I'm trying to call the procedure in the same asp it's doesn't worked. This is my code
<html>
<head>
<meta content="text/html; charset=unicode" http-equiv="Content-Type">
<title>Call operations</title>
<script LANGUAGE="VbScript">
Option explicit
DIm outpostdb
</script>
<script ID="clientEventHandlersVBS" LANGUAGE="vbscript">
Option explicit
Sub PressConnect()
On Error Resume Next
DIM pConnectTo
If Txtaddress.value = "" Then
MsgBox "You have not entered a destination address",0,"connect"
Exit Sub
else
msgbox Txtaddress.value
pConnectTo = Txtaddress.value
End If
msgbox pconnecto
outpostdb.cmdStartSession pconnecto
set outpostDB = nothing
end sub
Sub window_onload
set outpostDB = nothing
end sub
</script>
</head>
<BODY>
<INPUT type=button id="buttConnect" style="LEFT: 18px; WIDTH: 200px; CURSOR: hand; POSITION: absolute; TOP: 74px; HEIGHT: 30px" onclick="PressConnect()" value="Connect" title="Connect">
<INPUT id=Txtaddress style="LEFT: 18px; WIDTH: 202px; TOP: 18px; HEIGHT: 30px"
size=26 name=text1>
</BODY>
</HTML>
I've created a Vb Dll and I'm creating the object from an asp, everything work's fine when I'm using one asp to collected the data and send it to the other asp but when I'm trying to call the procedure in the same asp it's doesn't worked. This is my code
<html>
<head>
<meta content="text/html; charset=unicode" http-equiv="Content-Type">
<title>Call operations</title>
<script LANGUAGE="VbScript">
Option explicit
DIm outpostdb
</script>
<script ID="clientEventHandlersVBS" LANGUAGE="vbscript">
Option explicit
Sub PressConnect()
On Error Resume Next
DIM pConnectTo
If Txtaddress.value = "" Then
MsgBox "You have not entered a destination address",0,"connect"
Exit Sub
else
msgbox Txtaddress.value
pConnectTo = Txtaddress.value
End If
msgbox pconnecto
outpostdb.cmdStartSession pconnecto
set outpostDB = nothing
end sub
Sub window_onload
set outpostDB = nothing
end sub
</script>
</head>
<BODY>
<INPUT type=button id="buttConnect" style="LEFT: 18px; WIDTH: 200px; CURSOR: hand; POSITION: absolute; TOP: 74px; HEIGHT: 30px" onclick="PressConnect()" value="Connect" title="Connect">
<INPUT id=Txtaddress style="LEFT: 18px; WIDTH: 202px; TOP: 18px; HEIGHT: 30px"
size=26 name=text1>
</BODY>
</HTML>