Hi,
you must put the semicolon after the select statment (in red)
VB Code:
Dim strSQL As String = "INSERT INTO tblPopulatedPlaces(AdminBdry1_ID,AdminBdry2_ID,AdminBdry3_ID,AdminBdry4_ID,PPname,uid_Created,date_C reated,uid_Modified,date_Modified)" & _ " VALUES(@AdminBdry1_ID,@AdminBdry2_ID,@AdminBdry3_ID,@AdminBdry4_ID,@PPname,@uid_Created,@date_Create d,@uid_Modified,@date_Modified)" & _ " SELECT * FROM tblPopulatedPlaces WHERE([uid_Created] <> '" & user.userName.ToString & "')[COLOR=Red];[/COLOR]"
Hope this helps




Reply With Quote