Convertir este codigo a vb.
Publicado por Andres (2 intervenciones) el 08/06/2007 19:20:44
Hola a todos espero alguien se apiade y me ayude a convertir este codigo de c# a vb, gracias!
using System.Data;
using System.Data.SqlClient;
public class Prueba
{
public static SqlConnection Conexion()
{
string conn = System.Configuration.ConfigurationManager.ConnectionStrings["pruebaConnectionString"].ConnectionString;
SqlConnection conex = new SqlConnection(con);
return conex;
}
public static bool ValidaUser(string user, string password)
{
bool respuesta;
using (SqlConnection connection = Conexion() )
{
SqlCommand command = new SqlCommand("ValUser", connection);
command.CommandType = CommandType.StoredProcedure;
SqlParameter parametro_user= command.Parameters.Add("@user", SqlDbType.VarChar);
parametro_user.Value = user;
SqlParameter parametro_pass= command.Parameters.Add("@pass", SqlDbType.VarChar);
parametro_pass.Value = password;
command.Connection.Open();
SqlDataReader reader = command.ExecuteReader();
respuesta= reader.HasRows;
reader.Close();
}
return resp;
}
#region PRUEBA
public static DataSet ObtieneImagenes(string id)
{
DataSet ds = new DataSet();
using (SqlConnection connection = Conexion())
{
SqlCommand command = new SqlCommand("Imagenes", connection);
command.CommandType = CommandType.StoredProcedure;
command.Parameters.Add("@id", SqlDbType.Int).Value = int.Parse(id);
command.Connection.Open();
SqlDataAdapter da = new SqlDataAdapter(command);
//SqlDataReader reader = command.ExecuteReader();
da.Fill(ds, "imagenes");
}
return ds;
}
#endregion
public static string ObtienePassword(string correo)
{
string respuesta="";
using (SqlConnection connection = Conexion())
{
SqlCommand command = new SqlCommand("Contrasena", connection);
command.CommandType = CommandType.StoredProcedure;
command.Parameters.Add("@correo", SqlDbType.VarChar).Value=correo;
command.Connection.Open();
SqlDataReader reader = command.ExecuteReader();
if (reader.HasRows)
{
reader.Read();
respuesta = reader.GetString(0);
reader.Close();
}
}
return respuesta;
}
}
using System.Data;
using System.Data.SqlClient;
public class Prueba
{
public static SqlConnection Conexion()
{
string conn = System.Configuration.ConfigurationManager.ConnectionStrings["pruebaConnectionString"].ConnectionString;
SqlConnection conex = new SqlConnection(con);
return conex;
}
public static bool ValidaUser(string user, string password)
{
bool respuesta;
using (SqlConnection connection = Conexion() )
{
SqlCommand command = new SqlCommand("ValUser", connection);
command.CommandType = CommandType.StoredProcedure;
SqlParameter parametro_user= command.Parameters.Add("@user", SqlDbType.VarChar);
parametro_user.Value = user;
SqlParameter parametro_pass= command.Parameters.Add("@pass", SqlDbType.VarChar);
parametro_pass.Value = password;
command.Connection.Open();
SqlDataReader reader = command.ExecuteReader();
respuesta= reader.HasRows;
reader.Close();
}
return resp;
}
#region PRUEBA
public static DataSet ObtieneImagenes(string id)
{
DataSet ds = new DataSet();
using (SqlConnection connection = Conexion())
{
SqlCommand command = new SqlCommand("Imagenes", connection);
command.CommandType = CommandType.StoredProcedure;
command.Parameters.Add("@id", SqlDbType.Int).Value = int.Parse(id);
command.Connection.Open();
SqlDataAdapter da = new SqlDataAdapter(command);
//SqlDataReader reader = command.ExecuteReader();
da.Fill(ds, "imagenes");
}
return ds;
}
#endregion
public static string ObtienePassword(string correo)
{
string respuesta="";
using (SqlConnection connection = Conexion())
{
SqlCommand command = new SqlCommand("Contrasena", connection);
command.CommandType = CommandType.StoredProcedure;
command.Parameters.Add("@correo", SqlDbType.VarChar).Value=correo;
command.Connection.Open();
SqlDataReader reader = command.ExecuteReader();
if (reader.HasRows)
{
reader.Read();
respuesta = reader.GetString(0);
reader.Close();
}
}
return respuesta;
}
}
Valora esta pregunta


0