SQL Server 2008で異なるステートメントを追加

Question

Protected Sub ImageButton2_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton2.Click 
     Dim pa As String 
     pa = Server.MapPath("~\\Morfk\\") 
     TextBox4.Text = pa 
     FileUpload1.SaveAs(TextBox4.Text + FileUpload1.FileName) 
     sqlcon.Open() 
     Dim sqlcmd As New SqlCommand("INSERT INTO [aldia db].[dbo].[morfak] ([stnamei] ,[kiedi],[addressi],[morfk] ,[emaili],[nuphone])VALUES('" + TextBox1.Text + "','" + TextBox2.Text + "' ,'" + TextBox3.Text + "','" + FileUpload1.FileName + "' ,'" + TextBox5.Text + "'," + TextBox6.Text + ")", sqlcon) 
     sqlcmd.ExecuteNonQuery() 
     MsgBox("the process of sending Facility has done ") 
     sqlcon.Close() 
     TextBox1.Text = "" 
     TextBox2.Text = "" 
     TextBox3.Text = "" 
     TextBox4.Text = "" 
     TextBox5.Text = "" 
     TextBox6.Text = "" 
    End Sub 

Answer 1

以下のようにSQLQueryを変更できます。戻り値に基づいて、適切なコメントを表示することができます。

"IF EXISTS (SELECT 1 FROM [aldia db].[dbo].[morfak] WHERE [stnamei]='" +TextBox1.Text+"') 
BEGIN 
RETURN -1 
END 
ELSE 
BEGIN 
INSERT INTO [aldia db].[dbo].[morfak] ([stnamei] ,[kiedi],[addressi],[morfk] ,[emaili],[nuphone])VALUES('" + TextBox1.Text + "','" + TextBox2.Text + "' ,'" + TextBox3.Text + "','" + FileUpload1.FileName + "' ,'" + TextBox5.Text + "'," + TextBox6.Text + ") 
RETURN 0 
END"