NetRemoteTOD sample in VB.NET

[adiel]

Hello I found the following example on another newsgroup:

is there any sample for NetRemoteTOD API function in C#?

[DllImport("netapi32.dll", CharSet=CharSet.Unicode)]
static extern uint NetRemoteTOD(string UncServerName, out IntPtr
BufferPtr);

[DllImport("netapi32.dll")]
static extern uint NetApiBufferFree(IntPtr Buffer);

struct TIME_OF_DAY_INFO
{
public uint tod_elapsedt, tod_msecs, tod_hours,
tod_mins, tod_secs, tod_hunds;
public int tod_timezone;
public uint tod_tinterval, tod_day, tod_month,
tod_year, tod_weekday;
}

--

IntPtr ptodi;
NetRemoteTOD( @"\\server", out ptodi );
TIME_OF_DAY_INFO todi = (TIME_OF_DAY_INFO)Marshal.PtrToStructure(
ptodi, typeof(TIME_OF_DAY_INFO) );
NetApiBufferFree( ptodi );

I was wondering if anyone had a sample on how to use NetRemoteTOD in VB.Net.

Thanks,
Adiel

 

[adiel]

I found no information on the internet on how to accomplish this in
vb.net so I went ahead and published an article on how I got this to
work:

http://www.codeproject.com/vb/net/NetRemoteTOD.asp

Thanks,
Adiel