[aspdecoffeehouse] =?iso-8859-1?Q?Re:_=5Baspdecoffeehouse=5D_VB_ActiveX_Komponente_f=FCrs_We?==?iso-8859-1?Q?b_verf=FCgbar_machen_-_wie=3F?=

Mon, 13 May 2002 15:52:37 -0700 

Hi Leute!

So, Eintrag gefunden, nun habe ich das hier ausprobiert:

Private Sub AltAzm_Click()
'// Calculates the Altitude and Azimuth for any object
'//
'//     Function: calcaltazm
'//
'//     Input Parameters:  Double   Latitude
'//                        Double   RA Hours
'//                        Double   RA Minutes
'//                        Double   RA Seconds
'//                        Double   Dec Degrees
'//                        Double   Dec Minutes
'//                        Double   Dec Seconds
'//
'//     Return Parameters: Double   Altitude
'//                        Double   Azimuth
'//

Dim objMy
Dim Alt, Azm

Set objMy = Server.CreateObject("acode2.acode1")
objMy.calcaltazm 51.25, 12, 14, 22, 33, 0, 0      <--- Zeile 31
AltAzm_Click = Alt & ", " & Azm
Set objMy = Nothing

End Sub
response.write AltAzm_Click()

Ich kriege folgenden Fehler:
Laufzeitfehler in Microsoft VBScript-Fehler '800a000d'

Typen unvertr�glich: 'AltAzm_Click'

/astrotest.asp, Zeile 31

Hmm... warum das jetzt?

Gru�,

Arkor, http://www.drhirn.com/20



| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp

Antwort per Email an