Dim tos As New TransactionOptions()
tos.IsolationLevel = iLevel
tos.Timeout = New TimeSpan(0, 0, 90)
Using(Scope As TransactionScope= New TransactionScope(TransactionScopeOption.Required, IsolationLevel.ReadCommitted))
{
'''''可以寫SQL操作了但是多個操作必須,要用同一個SqlConnection進行關聯
Scope .Complete()
}