Eine Funktion gibt einen Wert zur�ck, in dem das Funktionsergebnis einer
fiktiven Variable mit dem Namen zugewiesen wird. 

Function GetN_Sv ()
  GetN_Sv = 123
End Function


Hier bei Dir kommt noch ein Problem dazu: das Ergebnisfeld hat keinen
Namen.  Also zwei Ans�tze 

A) das Kind benennen

    strSQLWorkLayer = "SELECT COUNT(DISTINCT WG_ID) as Anzahl" ...
      ...
    GetN_Sv = objWorkLayerRS("Anzahl")
  end function


B) auf das Feld per Indexnummer zugreifen

    strSQLWorkLayer = "SELECT COUNT(DISTINCT WG_ID) as Anzahl" ...
      ...
    GetN_Sv = objWorkLayerRS(0)
  end function


B') ganz perfekt w�re es so 

    strSQLWorkLayer = "SELECT COUNT(DISTINCT WG_ID) as Anzahl" ...
      ...
    GetN_Sv = objWorkLayerRS(0).value
  end function



-- 

Viele Gr��e
Hubert Daubmeier 




-----Original Message-----
From: Roni Schuetz [mailto:[EMAIL PROTECTED]] 
Sent: Monday, December 24, 2001 1:06 PM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] functions und ado ??


Guten Tag an alle,

habe folgendes problem:
auf der ersten *.asp seite 
habe ich diesen aufruf: 

if n_Sv = "" then  n_Sv = GetN_Sv()

und in einem der includes folgende function:

set objWorkLayerConn = CreateObject("ADODB.Connection")
set objWorkLayerRS = CreateObject ("ADODB.Recordset")

objWorkLayerConn.ConnectionString = strConnect objWorkLayerConn.Open

'# Get the number of reg. supervisors
public function GetN_Sv ()
        Dim n_Tmp
        n_Tmp = 1
                
        strSQLWorkLayer =       " SELECT COUNT(DISTINCT WG_ID) " & _
                                " FROM TWorker " & _
                                " WHERE (WG_ID = " & n_Tmp & ")"
        ' execute the connetion
        objWorkLayerRS.Open strSQLWorkLayer, objWorkLayerConn
end function

wie gebe ich nun den wert den ich erhalten habe von der DB zurueck ????

Danke Roni

| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed 
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv Sie 
| knnen sich unter folgender URL an- und abmelden: 
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp


| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp

Antwort per Email an