Soyez le premier à donner votre avis sur cette source.
Snippet vu 30 040 fois - Téléchargée 31 fois
Function recupere_requete_tableau(ByVal requete As String, ByVal tab() As String) As Array 'i est une variable global donc declarée en entête de code i = 0 Try 'connection a la base de données MyConnection = New SqlConnection MyConnection.ConnectionString = "server='machine';database='bdd'; user id='user';password='mot de passe';Trusted_Connection=true" MyConnection.Open() Dim oCommand As New SqlCommand(requete, MyConnection) Dim oReader As SqlDataReader = oCommand.ExecuteReader() While oReader.Read() tab(i) = oReader.GetString(0) i = i + 1 End While oReader.Close() MyConnection.Close() recupere_requete_tableau = tab Catch er As Exception End Try End Function Function donne_borne_tab() As Integer donne_borne_tab = i End Function 'choix tableau ndimension 'cette fonction retourne un tableau contenant le resultat d'un requete sql passée en paramètre Function recupere_requete_tableau2d(ByVal tab(,) As String) As Array i = 0 j = 0 Try 'connection a la base de données MyConnection = New SqlConnection MyConnection.ConnectionString = "server='machine';database='bdd'; user id='user';password='mot de passe';Trusted_Connection=true" MyConnection.Open() Dim oCommand As New SqlCommand(requete, MyConnection) Dim oReader As SqlDataReader = oCommand.ExecuteReader() Dim oReader As SqlDataReader = oCommand.ExecuteReader() While oReader.Read() Try While True tab(i, j) = oReader.GetValue(j) j = j + 1 End While Catch ex As Exception j = 0 End Try i = i + 1 End While oReader.Close() MyConnection.Close() recupere_requete_tableau2d = tab Catch er As Exception End Try End Function
19 oct. 2004 à 10:50
Là c'est du C# pour une BdD Access, mais ca revient au meme!
//Type de connection, ici acces a une BdD Access.
string ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Ole DB Services=-4; Data Source=C:\\Documents an" +
"d Settings\\Administrateur\\Mes documents\\ASP\\login.mdb";
//Command 'Select' à effectuer
string CommandText = "SELECT [Table1].[Log], [Table1].[Pass] FROM [Table1]";
//On crée un objet 'dbConnection' qui accede à Access
System.Data.IDbConnection dbConnection = new System.Data.OleDb.OleDbConnection(ConnectionString);
//On crée la requete
System.Data.IDbCommand dbCommand = new System.Data.OleDb.OleDbCommand();
dbCommand.CommandText = CommandText;
dbCommand.Connection = dbConnection;
//Ouverture de la BdD
dbConnection.Open();
//Affichage sur la page Html
DataGrid1.DataSource = dbCommand.ExecuteReader(CommandBehavior.CloseConnection);
DataGrid1.DataBind();
6 mai 2004 à 06:42
mais bon merci pour les debutant en programmation
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.