Problems adding data to access

[k3pos]

Hi,
I have problems with adding data to pass access

Private Sub Command1_Click()
    Dim username As String
    Dim password As String
    Dim title As String
    
    Set AConn = New ADODB.Connection
    Set ARecd = New ADODB.Recordset
    Set aComm = New ADODB.Command
    
    title = title_t.Text
    password = pass_t.Text
    username = username_t.Text
    CString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=pass.mdb; DefaultDir=" & App.Path & ";"
    AConn.ConnectionString = CString
    AConn.Open
    
    RString = "insert into pass (`סיסמא`,`שם משתמש`,`נושא`,) values(" & password & "," & username & "," & title & ")"
    ARecd.Open RString
End Sub

i dont know what is the broblem
i cannot give the error becuase its hebrew..

What can be the problem ?

-k3pos