เริ่มแรกก็ประกาศ External function ก่อนนะครับ FUNCTION long GetVolumeInformation & (string lpRootPathName, REF string lpVolumeNameBuffer, long nVolumeNameSize...
name = str_wsadata unsignedinteger version unsignedinteger highversion character description[257] character systemstatus[129] nsignedinteger maxsockets unsignedinteger maxupddg string vendorinfo
จากนั้นต้องประกาศ เรียก External function ครับ function int WSAStartup (uint...
ประกาศExternal function ครับ ตามนี้ FUNCTION long GetComputerNameA(ref string ComputerName, ref ulong BufferLength) LIBRARY "KERNEL32.DLL" FUNCTION long GetUserNameA(ref string UserName, ref ulong BufferLength) LIBRARY "ADVAPI32.DLL"
จากนั้น ก็ทำตามตัวอย่างครับ long ll_ret string ls_ComputerName, ls_UserName ulong BufferLength = 250 // you may need to adjust this. see Note