cn = New OleDbConnection("Provider= Microsoft.Jet.Oledb.4.0;Data source =" & Server.MapPath("DEO.mdb")) cn.Open() cmd = New OleDbCommand("select FileName from Paripatra", cn) Dr = cmd.ExecuteReader If Dr.HasRows = True Then Dr.Read() Dim Delrec As String Delrec = "DELETE from Paripatra where FileName = '" & Session.Item("strfile") & Session.Item("Extent") & "'" 'Delrec = " Update from Paripatra" Delrec = cmd.CommandText End If Dr.Close() cmd.ExecuteNonQuery() End Sub End Class
Delrec = cmd.CommandText
"select FileName from Paripatra"
cmd.CommandText = Delrec
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)