Please Help! SQLCE Error

[Snizbatch]

Hi, I'm trying to change the data handling portion of an Application I'm writing for Windows Mobile 2003, to SQL rather than using a streamwriter. I'm receiving an error when trying to create a database.

Here's the error:

An unhandled exception of type 'System.Data.SqlServerCe.SqlCeException' occurred in System.Data.SqlServerCe.dll

Additional information: SqlCeException

Here's the code:

Dim dsAircraft As DataSet = Nothing
        Dim daAircraft As SqlCeDataAdapter = Nothing
        Dim ssceConn As SqlCeConnection = Nothing
 
        Dim DataPath As String = "Data Source=" & AppInfo.AppPath & "\aircraft.sdf"
        If System.IO.File.Exists(AppInfo.AppPath & "\aircraft.sdf") = False Then
            Dim engine As New SqlCeEngine(DataPath)
            engine.CreateDatabase()         <--------------ERROR OCCURS HERE!
        End If
 
        ssceConn = New SqlCeConnection(DataPath)
        'Insert a new aircraft
        Dim insertCommand As SqlCeCommand = ssceConn.CreateCommand()
 
        'Set the CommandText for the command
        'The ?'s represent parameters that will be set later
        insertCommand.CommandText = "Insert Into People(name, l_name) Values (?,?)"
 
        'Add parameters and assign them the values from the TextBoxes on the form
        insertCommand.Parameters.Add(New SqlCeParameter("code", SqlDbType.NText, 10))
        insertCommand.Parameters.Add(New SqlCeParameter("n_number", SqlDbType.NText, 8))
        insertCommand.Parameters.Add(New SqlCeParameter("bow", SqlDbType.Decimal))
        insertCommand.Parameters.Add(New SqlCeParameter("mac", SqlDbType.Decimal))
        insertCommand.Parameters.Add(New SqlCeParameter("maxfuel", SqlDbType.Decimal))
        insertCommand.Parameters.Add(New SqlCeParameter("hour1", SqlDbType.Decimal))
        insertCommand.Parameters.Add(New SqlCeParameter("hour2", SqlDbType.Decimal))
        insertCommand.Parameters.Add(New SqlCeParameter("hour3", SqlDbType.Decimal))
        insertCommand.Parameters.Add(New SqlCeParameter("mgtow", SqlDbType.Decimal))
 
 
        insertCommand.Parameters("code").Value = txtCode.Text
        insertCommand.Parameters("n_number").Value = txtNNumber.Text
        insertCommand.Parameters("bow").Value = txtBOW.Text
        insertCommand.Parameters("mac").Value = txtMAC.Text
        insertCommand.Parameters("maxfuel").Value = txtMaxFuel.Text
        insertCommand.Parameters("hour1").Value = txtBurn1.Text
        insertCommand.Parameters("hour2").Value = txtBurn2.Text
        insertCommand.Parameters("hour3").Value = txtBurn3.Text
        insertCommand.Parameters("mgtow").Value = txtMGTOW.Text
 
        btnAddAircraft.Enabled = False
        ssceConn.Open()
        insertCommand.ExecuteNonQuery()
        ssceConn.Close()
        btnAddAircraft.Enabled = True

Any help would be appreciated!
Thanks,
Jim