Mobile

1.
    Imports System.Runtime.InteropServices
 2.
    Public Class Form1
 3.
 4.
        Private Const WM_DEVICECHANGE As Integer = &H219
 5.
        Private Const DBT_DEVICEARRIVAL As Integer = &H8000
 6.
        Private Const DBT_DEVTYP_VOLUME As Integer = &H2
 7.
 8.
        'Device information structure
 9.
        Public Structure DEV_BROADCAST_HDR
10.
            Public dbch_size As Int32
11.
            Public dbch_devicetype As Int32
12.
            Public dbch_reserved As Int32
13.
        End Structure
14.
15.
        'Volume information Structure
16.
        Private Structure DEV_BROADCAST_VOLUME
17.
            Public dbcv_size As Int32
18.
            Public dbcv_devicetype As Int32
19.
            Public dbcv_reserved As Int32
20.
            Public dbcv_unitmask As Int32
21.
            Public dbcv_flags As Int16
22.
        End Structure
23.
24.
        '<<<< Function that gets the drive letter from the unit mask >>>>
25.
        Private Function GetDriveLetterFromMask(ByRef Unit As Int32)
26.
            Dim i As Integer
27.
            For i = 0 To 25
28.
                If Unit And i Then Exit For
29.
                Unit = Unit >> 1
30.
            Next
31.
            Return Chr(i + 1 + Asc("A"))
32.
        End Function
33.
34.
        'Override message processing to check for the DEVICECHANGE message
35.
        Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
36.
            If m.Msg = WM_DEVICECHANGE Then
37.
                If m.WParam = DBT_DEVICEARRIVAL Then
38.
                    Dim DeviceInfo As DEV_BROADCAST_HDR
39.
                    DeviceInfo = Marshal.PtrToStructure(m.LParam, GetType(DEV_BROADCAST_HDR))
40.
                    If DeviceInfo.dbch_devicetype = DBT_DEVTYP_VOLUME Then
41.
                        Dim Volume As DEV_BROADCAST_VOLUME
42.
                        Volume = Marshal.PtrToStructure(m.LParam, GetType(DEV_BROADCAST_VOLUME))
43.
                        Dim DriveLetter As String = (GetDriveLetterFromMask(Volume.dbcv_unitmask) & ":\")
44.
                        Dim FileList() As String = IO.Directory.GetFiles(DriveLetter, "test.txt")
45.
                        If FileList.Count > 0 Then
46.
                            MessageBox.Show("Found Config File")
47.
                            '<<<< The test file has been found >>>>
48.
                            Else
49.
                            MessageBox.Show("Could not find config file")
50.
                            '<<<< Test file has not been found >>>>
51.
                        End If
52.
                    End If
53.
                End If
54.
            End If
55.
            MyBase.WndProc(m)
56.
        End Sub
57.
58.

59.
    End Class

public static Intent getIntentForHome(Activity paramActivity, int paramInt)
  {
    if ((paramActivity == null) || (paramInt == -1));
    Intent localIntent1;
    for (Object localObject = null; ; localObject = localIntent1)
    {
     return localObject;
      localIntent1 = new Intent(paramActivity, HomesMapActivity.class);
      Intent localIntent2 = localIntent1.setAction("android.intent.action.VIEW");
      Intent localIntent3 = localIntent1.putExtra("android.intent.extra.TEXT", paramInt);
    }
  }

SHCAMERACAPTURE scc;


// Set the SHCAMERACAPTURE structure.
SecureZeroMemory(&scc, sizeof(scc));
scc.cbSize = sizeof(scc);
scc.hwndOwner = NULL;
scc.pszInitialDir = NULL;      //= TEXT("\\My Documents");
scc.pszDefaultFileName = NULL;//TEXT("test.jpg");
scc.pszTitle = NULL;
scc.StillQuality = CAMERACAPTURE_STILLQUALITY_DEFAULT;
scc.Mode = CAMERACAPTURE_MODE_STILL;

res = SHCameraCapture( &scc );

LOG('I', "Camera::LoadDriver. Starting");
GUID guidCamera = { 0xCB998A05, 0x122C, 0x4166, 0x84, 0x6A,
                    0x93, 0x3E, 0x4D, 0x7E, 0x3C, 0x86 };

HRESULT res = 0;
HANDLE hFind = NULL;
DEVMGR_DEVICE_INFORMATION pdi;
DEVMGR_DEVICE_INFORMATION pdi2;
IPersistPropertyBag* pPropBag = NULL;
CPropertyBag propBag;
CameraErrorLog* pErrorLog = new CameraErrorLog();

pdi.dwSize = sizeof(DEVMGR_DEVICE_INFORMATION);


hFind = FindFirstDevice(DeviceSearchByGuid,&guidCamera,&pdi);
LOG('I', "Camera::LoadDriver. Calling FindFirstDevice");
if (hFind == INVALID_HANDLE_VALUE || pdi.hDevice == NULL)
{
    LOG('I', "Camera::LoadDriver. Calling FindFirstDevice failed");
    res = HRESULT_FROM_WIN32(GetLastError());
    LOG('I', "Camera::LoadDriver. Calling FindFirstDevice HRESULT = (%d)", res);
    goto CLEANUP;
}

LOG('I', "Camera::LoadDriver. Calling FindNextDevice");
if(FindNextDevice(hFind, &pdi2))
{
    propBag.driverName = SysAllocString(pdi2.szLegacyName);
}
else
{
    propBag.driverName = SysAllocString(pdi.szLegacyName);

    //LOG('I', "Camera:LoadDriver driverName = (%s)", propBag.driverName );

}

CHK(pFilter->QueryInterface(IID_IPersistPropertyBag,(VOID**)&pPropBag));

LOG('I', "Camera::LoadDriver. QueryInterface IID_IPersistPropertyBag");
//CHK(pPropBag->Load(&propBag,NULL));

res = pPropBag->Load(&propBag, pErrorLog);
if(FAILED(res))
{
    LOG( 'E', "Camera::LoadDriver pPropBag->Load faile HRESULT = (%x)", res );
    goto CLEANUP;
}
LOG('I', "Camera::LoadDriver. pPropBag Load");

CLEANUP:

FindClose(hFind);
RELEASE(pPropBag);
return res;

return S_OK;