[C#]
＜%@ WebService Language="C#" Class="Orders" %＞
＜%@ Assembly name="System.EnterpriseServices, Version=1.0.3300.0,Culture=neutral,PublicKeyToken=b03f5f7f11d50a3a" %＞
using System;
using System.Data;
using System.Data.SqlClient;
using System.Web.Services;
using System.EnterpriseServices; public class Orders : WebService
{
[ WebMethod(TransactionOption=TransactionOption.RequiresNew)]
public int DeleteAuthor(string lastName)
{
String deleteCmd = "DELETE FROM authors WHERE au_lname='" +
lastName + "'" ;
String exceptionCausingCmdSQL = "DELETE FROM NonExistingTable WHERE
au_lname='" + lastName + "'" ; SqlConnection sqlConn = new SqlConnection(
"Persist Security Info=False;Integrated Security=SSPI;database=pubs;server=myserver"); SqlCommand deleteCmd = new SqlCommand(deleteCmdSQL,sqlConn);
SqlCommand exceptionCausingCmd = new
SqlCommand(exceptionCausingCmdSQL,sqlConn); // This command should execute properly.
deleteCmd.Connection.Open();
deleteCmd.ExecuteNonQuery(); // This command results in an exception, so the first command is
// automatically rolled back. Since the XML Web service method is
// participating in a transaction, and an exception occurs, ASP.NET
// automatically aborts the transaction. The deleteCmd that
// executed properly is rolled back. int cmdResult = exceptionCausingCmd.ExecuteNonQuery(); sqlConn.Close(); return cmdResult;
}
}
[Visual Basic]
＜%@ WebService Language="VB" Class="Orders" %＞
＜%@ assembly name="System.EnterpriseServices" %＞ Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Web.Services
Imports System.Web.Util
Imports System.EnterpriseServices Public Class Orders ＜WebMethod(TransactionOption:=TransactionOption.RequiresNew)＞ _
Public Function DeleteAuthor (lastName as String) as Integer Dim deleteCmdSQL As String = "DELETE FROM authors WHERE au_lname='" + _
lastName + "'"
Dim exceptionCausingCmdSQL As String = "DELETE FROM " + _
"NonExistingTable WHERE au_lname='" + lastName + "'" Dim sqlConn As SqlConnection = New SqlConnection( _
"Persist Security Info=False;Integrated Security=SSPI;database=pubs;server=myserver") Dim deleteCmd As SqlCommand = New SqlCommand(deleteCmdSQL,sqlConn)
Dim exceptionCausingCmd As SqlCommand = New _
SqlCommand(exceptionCausingCmdSQL,sqlConn) ' This command should execute properly.
deleteCmd.Connection.Open()
deleteCmd.ExecuteNonQuery() ' This command results in an exception, so the first command is
' automatically rolled back. Since the XML Web service method is
' participating in a transaction, and an exception occurs, ASP.NET
' automatically aborts the transaction. The deleteCmd that
' executed properly is rolled back. Dim cmdResult As Integer = exceptionCausingCmd.ExecuteNonQuery()
sqlConn.Close() Return cmdResult
End Function
End Class | 
