Question Access database Query

[Zexor]

I am trying to create an access database file with this query

   Dim oQuery As String = "CREATE TABLE " & table & _
                                " (Type TEXT(10) NOT NULL," & _
                                "Data TEXT(50) NOT NULL," & _
                                "Data2 TEXT(50) NOT NULL)"

then insert data into it with this query

        Dim oQuery As String = "insert into " & table & _
                                " values('" & type & _
                                "','" & data & _
                                "','" & data2 & "')"

That worked fine. But i want to add a primary key to it, how should i change my query? the create table one will be like this? insert data unchanged? but it doesnt seem to work right after i changed it

        Dim oQuery As String = "CREATE TABLE " & table & _
                                " (Type TEXT(10) NOT NULL," & _
                                "Data TEXT(50) NOT NULL," & _
                                "Data2 TEXT(50) NOT NULL," & _
                                "PRIMARY KEY(Type) )"

 

[Hack]

Try

Dim oQuery As String = "CREATE TABLE " & table & _
                                " (Type TEXT(10) PRIMARY KEY NOT NULL," & _
                                "Data TEXT(50) NOT NULL," & _
                                "Data2 TEXT(50) NOT NULL)"

 

[cjard]

Hack's syntax looks more like Oracle than Access.. Try MSDN:

How to use common Data Definition Language (DDL) SQL statements for the Jet database engine

Ctrl+F for PRIMARY KEY