I'm busy with building a control for my webcam... I want other people to be able to control my webcam from left to right

I want to do this with ASP over the internet,... up to now I am able to remotely control LED's connected to the com-port of my server

I use 2 signals >> DTR en RTS

Question-1
how is it possible to put the signal of DTR or RTSto 1 for a longer time... right now the signal jumps to 1 when the ASP page is loaded and the quickly turns back to 0

Question-2
The RTS signal doesn't listen to a any commando at all!!!
I cant put it to 0 at all

I am using the following code

In the class

Public Sub SetDtr(ByVal bDtr As Byte)
Call DTR(bDtr)
End Sub

Public Sub SetRts(ByVal bRts As Byte)
Call Rts(bRts)
End Sub

Private Sub Class_Initialize()
i = OPENCOM("COM2,1200,N,8,1")
If i = 0 Then MsgBox ("problem with com-port")
End Sub


in the module

Declare Function OPENCOM Lib "Port" (ByVal A$) As Integer
Declare Sub DTR Lib "Port" (ByVal b%)
Declare Sub RTS Lib "Port" (ByVal b%)
Declare Function CTS Lib "Port" () As Integer
Declare Function DSR Lib "Port" () As Integer
Declare Function RI Lib "Port" () As Integer
Declare Function DCD Lib "Port" () As Integer

ASP page

<%dim ObjLamp2
set ObjLamp2 = Server.CreateObject("Lamp211.Server211")
call ObjLamp2.SetDTR(1)
set ObjLamp2 = nothing
%>