I think that you have validate if exists controls before you asigned value...
AccessDataSource1.InsertParameters("Nama").DefaultValue = <pre lang="XML">GridView1.FooterRow.FindControl("txtNama") <> null ?
DirectCast(GridView1.FooterRow.FindControl("txtNama"), TextBox).Text</pre> : ""