ボタンを1回クリックして2つ以上のクエリを実行する

Question

ボタンをクリックすると2つの異なるテーブルにデータを挿入します。したがって、異なる資格情報を持つ2つの挿入クエリがあります。最初の挿入クエリは正しく動作していますが、2番目のクエリは実行されていません。ここで私は何を試みた。

Try 
      Dim str1 As String = "INSERT INTO yogaClasses (`yogaID`,`name`, `category`, `websiteName`, `email`, `phone1`, `phone2`, `mobileNumber`, `buildingName`, `streetName`, `landmark`, `areaName`, `city`, `State`, `zipCode`, `address`, slotTime1From, `slotTime1To`, `slotTime2From`, `slotTime2To`, fees, `overview`, `establishment`, `newBatchStart`, `yogaType`, `facilities`, payment, `status`, `username`, `password`) values ('" + ID + "','" + name + "', '" + businessCategory + "', '" + website + "', '" + email + "', '" + phoneNo1 + "', '" + phoneNo2 + "', '" + mobileNumber + "', '" + building + "', '" + street + "', '" + landpoint + "', '" + area + "', '" + city + "', '" + stateName + "', '" + zipCode + "', '" + fulladdress + "', '" + slot1A + "', '" + slot1B + "', '" + slot2A + "', '" + slot2B + "', '" + feesPay + "', '" + about + "', '" + foundYear + "', '" + startnewBatch + "', '" + selectedYoga + "', '" + selectedFacility + "', '" + payments + "', 'active', '" + mobileNumber + "', '" + membersAutoPassword.Text + "')" 

      Dim str2 As MySqlDataReader 
      Dim adapter As New MySqlDataAdapter 
      Dim command As New MySqlCommand 
      command.CommandText = str1 
      command.Connection = con 
      adapter.SelectCommand = command 
      con.Open() 
      str2 = command.ExecuteReader 
      con.Close() 
      Response.Redirect("business-added.aspx") 
     Catch ex As Exception 
      Response.Write(ex) 
     End Try 



Try 
      Dim str2 As String = "INSERT INTO yogaAgeGroup (`6-15`, `16-20`, `21-25`, `26-30`, `31-35`, `35+`, `yogaID`) values('" + ageup1.Text + "', '" + ageup2.Text + "', '" + ageup3.Text + "', '" + ageup4.Text + "', '" + ageup5.Text + "', '" + ageup6.Text + "', '" + TextId.Text + "')" 
      Dim str3 As MySqlDataReader 
      Dim adapter As New MySqlDataAdapter 
      Dim command As New MySqlCommand 
      command.CommandText = str2 
      command.Connection = con 
      adapter.SelectCommand = command 
      con.Open() 
      str3 = command.ExecuteReader 
      con.Close() 
     Catch ex As Exception 
      Response.Write(ex) 
     End Try 

第2のクエリは実行されません。私はこれで間違っているのですか？または両方でクエリを実行することは可能ですか？ （あなたの第一クエリで）

Answer 1

問題

con.Close() 
Response.Redirect("business-added.aspx") 

移動2番目のクエリのcon.Close後にこの行（）

Response.Redirect("business-added.aspx") 

この行は別のページにリダイレクトされますので、その残りのコードは実行されません