lave en dll til server

' ------------------------------------ Class1 ------------------------------------
' Husk -> Reference "COM+ Server Type Library"
' --------------------------------------------------------------------------------
Option Explicit

Private objContext    As ObjectContext ' COM+ Server Type Library

Private objServer      As Object ' http://www.w3schools.com/asp/asp_ref_server.asp
Private objRequest    As Object ' http://www.w3schools.com/asp/asp_ref_request.asp
Private objSession    As Object ' http://www.w3schools.com/asp/asp_ref_session.asp
Private objResponse    As Object ' http://www.w3schools.com/asp/asp_ref_response.asp
Private objApplication As Object ' http://www.w3schools.com/asp/asp_ref_application.asp

Private Sub Class_Initialize()
  Set objContext = GetObjectContext()
  Set objServer = objContext("Server")
  Set objRequest = objContext("Request")
  Set objSession = objContext("Session")
  Set objResponse = objContext("Response")
  Set objApplication = objContext("Application")
End Sub

Private Sub Class_Terminate()
  Set objApplication = Nothing
  Set objResponse = Nothing
  Set objSession = Nothing
  Set objRequest = Nothing
  Set objServer = Nothing
  Set objContext = Nothing
End Sub

Public Function GetHostname() As String
  ' http://www.w3schools.com/asp/coll_servervariables.asp
  GetHostname = objRequest.ServerVariables("SERVER_NAME") ' ellers er det REMOTE_HOST
End Function
' ------------------------------------ Class1 ------------------------------------

ellers så test det før du roder med det i din dll..

<%Response.Write(Request.ServerVariables("SERVER_NAME"))%>

<%= Response.Write(Request.ServerVariables("SERVER_NAME")) %>

Skal være sådan: (Ikke objRequest. men objResponse.)

Public Function GetHostname() As String
  ' http://www.w3schools.com/asp/coll_servervariables.asp
  GetHostname = objResponse.ServerVariables("SERVER_NAME") ' ellers er det REMOTE_HOST
End Function

nej glem det.. det er mig der læser som en hest :D den er god nok :D

Takker det virker jo.. !!!

Selv tak ;)

Du har også liget et spørgsmål her: http://www.eksperten.dk/spm/702995

lukket