tede_saputra

How about if you add this statement in your code [code] Dim conn As New OleDb.OleDbConnection Dim comm As New OleDb.OleDbCommand [/code] thanks Here the code I am using [code] Try '' Add this statement Dim Connection_Update As New OleDb.OleDbConnection Dim OleCommand_Update As New OleDb.OleDbCommand Connection_Update = New OleDbConnection("Provider = …

Hi Nick You can try this [code] Public Function GetConnectionString() As String Return "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= D:\tes.mdb" 'you can change the address End Function Public Sub InsertData(ByVal SQL As String) Dim conn As New OleDb.OleDbConnection Dim comm As New OleDb.OleDbCommand conn = New OleDb.OleDbConnection(GetConnectionString()) conn.Open() comm = New OleDb.OleDbCommand(SQL, conn) comm.ExecuteNonQuery() …

Dim words() As String = input.Split(New [Char]() {" "c}, System.StringSplitOptions.None) we can only write Dim words() As String = input.Split(" ")