Uso de activex en asp
Estoy utilizando un activex para graficación, el cual tiene que tomar datos de sql server, es decir que los datos provendrán de un script de vbscript de ejecución del lado del servidor.
El problema es que el activex que quiero utilizar solo funciona cuando lo pongo en un script de ejecución del lado del cliente.
El activex gráfica después que se le han pasado 2 arrais como parámetro, la pregunta es si es posible traer un arrai de datos de un script del lado del servidor a un script del lado del cliente.
Si esto no es posible la otra pregunta es por que este objeto no funciona cuando se lo pasa al script del lado del servidor, por más que está registrado e instalado en el servidor.
El activex se llama dynaplot y descargue la versión trial de internet.
A continuación te envío el código que quiero pasar a un script del lado del servidor:
<html>
<head>
</head>
<body>
<object classid="clsid:5220cb21-c88d-11cf-b347-00aa00a28331"
align="baseline" border="0" width="10" height="10">
<param name="LPKPath" value="..\dynaplot.lpk"></object>
<OBJECT id=DynaPlot1 style="LEFT: 0px; TOP: 0px" codeBase=../dynaplot.cab height=210
width=626 align=baseline border=0 classid="clsid:CEE3D27C-C975-11D2-9092-4854E82A1077"
name=DynaPlot1 VIEWASTEXT></OBJECT>
</body>
</html>
<p><script language=VBScript><!--
NumBins = 400
Dim X(399), Y(399)
Private Sub Window_OnLoad()
DynaPlot1.Scale.XLeft=0
DynaPlot1.Scale.XRight=400
DynaPlot1.Scale.YBottom=50
DynaPlot1.Scale.YTop=100
DynaPlot1.Scale.XScale=1
DynaPlot1.Scale.YScale=1
DynaPlot1.TextDescriptors.TitleText.Text="Styles"
DynaPlot1.TextDescriptors.XText.Text="Frequency"
DynaPlot1.TextDescriptors.YText.Text="Level"
DynaPlot1.TextDescriptors.XUnitText.Text="Hz"
DynaPlot1.TextDescriptors.YUnitText.Text="dBm"
for Lugar = 1 to 400
X(Lugar-1)=Lugar
Y(Lugar-1)= 60+(Lugar/10)
next
If DynaPlot1.DataCurves.Count = 0 Then
Set K = DynaPlot1.DataCurves.AddVB("Curve1", X, Y, True)
K.Curve.CurveStyle = CURVESTYLE_BAND Or CURVESTYLE_FILLED
K.Curve.BaseLineY = 0
Else
Set K = DynaPlot1.DataCurves(0)
K.Curve.UpdateDataVB X, Y
End If
End Sub
--></script></p>
Agradezco cualquier sugerencia
El problema es que el activex que quiero utilizar solo funciona cuando lo pongo en un script de ejecución del lado del cliente.
El activex gráfica después que se le han pasado 2 arrais como parámetro, la pregunta es si es posible traer un arrai de datos de un script del lado del servidor a un script del lado del cliente.
Si esto no es posible la otra pregunta es por que este objeto no funciona cuando se lo pasa al script del lado del servidor, por más que está registrado e instalado en el servidor.
El activex se llama dynaplot y descargue la versión trial de internet.
A continuación te envío el código que quiero pasar a un script del lado del servidor:
<html>
<head>
</head>
<body>
<object classid="clsid:5220cb21-c88d-11cf-b347-00aa00a28331"
align="baseline" border="0" width="10" height="10">
<param name="LPKPath" value="..\dynaplot.lpk"></object>
<OBJECT id=DynaPlot1 style="LEFT: 0px; TOP: 0px" codeBase=../dynaplot.cab height=210
width=626 align=baseline border=0 classid="clsid:CEE3D27C-C975-11D2-9092-4854E82A1077"
name=DynaPlot1 VIEWASTEXT></OBJECT>
</body>
</html>
<p><script language=VBScript><!--
NumBins = 400
Dim X(399), Y(399)
Private Sub Window_OnLoad()
DynaPlot1.Scale.XLeft=0
DynaPlot1.Scale.XRight=400
DynaPlot1.Scale.YBottom=50
DynaPlot1.Scale.YTop=100
DynaPlot1.Scale.XScale=1
DynaPlot1.Scale.YScale=1
DynaPlot1.TextDescriptors.TitleText.Text="Styles"
DynaPlot1.TextDescriptors.XText.Text="Frequency"
DynaPlot1.TextDescriptors.YText.Text="Level"
DynaPlot1.TextDescriptors.XUnitText.Text="Hz"
DynaPlot1.TextDescriptors.YUnitText.Text="dBm"
for Lugar = 1 to 400
X(Lugar-1)=Lugar
Y(Lugar-1)= 60+(Lugar/10)
next
If DynaPlot1.DataCurves.Count = 0 Then
Set K = DynaPlot1.DataCurves.AddVB("Curve1", X, Y, True)
K.Curve.CurveStyle = CURVESTYLE_BAND Or CURVESTYLE_FILLED
K.Curve.BaseLineY = 0
Else
Set K = DynaPlot1.DataCurves(0)
K.Curve.UpdateDataVB X, Y
End If
End Sub
--></script></p>
Agradezco cualquier sugerencia
1 respuesta
Respuesta de smunoz
1