I created a com in vb6.

Public Function getcurruser() As String
Dim oSysInfo As ActiveDs.ADSystemInfo
Dim xyz
Dim obj As Variant
Dim adspath As Object
Set oSysInfo = CreateObject("ADSystemInfo")
xyz = "LDAP://" & oSysInfo.UserName
Set obj = GetObject(xyz)
getcurruser = obj.adspath
End Function


IT WORKS FINE WHEN I USE IT IN ASP BUT 
i get a different o/p in ASP.net(after doing early binding using 
TlbImp.exe) that too on the same server(win 2000 ADv server).
Help..?