这是我的代码
//Probando insercion
OleDbConnection conexionFoxPro = new OleDbConnection();
string rutaFoxPro = @"C:\Users\BigMander\Documents\Proyectos de Visual FoxPro\prueba.dbc";
conexionFoxPro.ConnectionString = String.Format("Provider=VFPOLEDB.1;Data Source={0};Exclusive=Yes;", rutaFoxPro);
bool sePudoEjecutarTodo = true;
try
{
conexionFoxPro.Open();
OleDbCommand comandoFoxPro = new OleDbCommand();
comandoFoxPro.CommandText =
@"INSERT INTO test ([nombre], [telefono], [id]) VALUES (?, ?, ?)";
comandoFoxPro.Parameters.Add("nombre", OleDbType.Char).Value = "bigmander";
comandoFoxPro.Parameters.Add("telefono", OleDbType.Char).Value = "some number";
comandoFoxPro.Parameters.Add("id", OleDbType.Integer).Value = 5;
comandoFoxPro.Connection = conexionFoxPro;
sePudoEjecutarTodo &= (comandoFoxPro.ExecuteNonQuery() > 0);
comandoFoxPro.CommandText =
@"SELECT nombre, telefono FROM test";
OleDbDataReader reader = comandoFoxPro.ExecuteReader();
while (reader.Read())
{
Console.WriteLine("{0}: {1}", reader.GetName(0), reader["nombre"]);
Console.WriteLine("{0}: {1}", reader.GetName(1), reader["telefono"]);
}
reader.Close();
reader.Dispose();
comandoFoxPro.CommandText =
"DELETE FROM test WHERE id = 5";
sePudoEjecutarTodo &= (comandoFoxPro.ExecuteNonQuery() > 0);
comandoFoxPro.CommandText =
"SET EXCLUSIVE ON; PACK test";
sePudoEjecutarTodo &= (comandoFoxPro.ExecuteNonQuery() > 0);
}
catch(OleDbException oleDbE)
{
sePudoEjecutarTodo = false;
Console.WriteLine(oleDbE.Message);
}
finally
{
if (sePudoEjecutarTodo)
Console.WriteLine("Congratulaciones si se armo todo");
else
Console.WriteLine("Pelas");
conexionFoxPro.Close();
Console.ReadKey();
}
我在foxpro 9中有一个数据库,其中有一个名为test的测试表,我用正常的sql语句进行了测试,除了从数据库中物理删除数据的pack语句之外,一切都很顺利,我发现了一个示例,它向我展示了如何做它但它与其他类型的驱动器(adodb)一起使用,但即使我可以用该代码做到这一点,我想知道这个东西如何在 oledb 中工作。
static void Main(string[] args)
{
Console.WriteLine("Starting program execution...");
string connectionString = @"Provider=VFPOLEDB.1;Data Source=h:\dave\";
using (OleDbConnection connection = new OleDbConnection(connectionString))
{
using (OleDbCommand scriptCommand = connection.CreateCommand())
{
connection.Open();
string vfpScript = @"SET EXCLUSIVE ON
DELETE FROM test WHERE id = 5
PACK";
scriptCommand.CommandType = CommandType.StoredProcedure;
scriptCommand.CommandText = "ExecScript";
scriptCommand.Parameters.Add("myScript", OleDbType.Char).Value = vfpScript;
scriptCommand.ExecuteNonQuery();
}
}
Console.WriteLine("End program execution...");
Console.WriteLine("Press any key to continue");
Console.ReadLine();
}
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)