Visualizzazione dei risultati da 1 a 3 su 3
  1. #1

    Domanda teorica passaggio asp / asp.net

    Ragazzi è da un pò di giorni che sto smanettando con asp.net 2.0 e devo dire che non sto incontrando grossi problemi.

    Però, dato che ho ancora fortemente radicata la mentalità asp nella gestione dei dati, vi chiedo un aiuto per capire come posso ottenere gli stessi risultati che ottenevo con asp utilizzando asp.net.

    Ad esempio spesso mi capitava di dover aprire due recordset annidati in questo modo:

    set RS1 = server.createobject("adodb.recordset")
    sql = "select * from tabella"
    RS1.open sql, connessione

    query= RS1("nomecampo")

    ' RS Annidato
    Set RS2 server.createobject("adodb.recordset")
    sql = "select * from tabella2 WHERE nomecampo2= '" & query & "'"
    RS2.open sql,database


    ecc, ecc, ecc,......

    Poi con un ciclo visualizzavo i dati, paginavo....ecc, ecc,

    Con asp.net come potre ottenere un risultato del genere?
    Despite of my rage i'm still just a rat in a cage

  2. #2
    codice:
    Private Function creaRs(ByVal strSql As String) As OleDb.OleDbDataReader
        Dim rs As OleDb.OleDbDataReader
        Dim cmdSql As OleDb.OleDbCommand
        Dim oleDbConn As OleDb.OleDbConnection
        Try
          cmdSql.CommandText = strSql
          oleDbConn.ConnectionString = strConnessione
          cmdSql.Connection = oleDbConn
          Try
            oleDbConn.Open()
            Try
              rs = cmdSql.ExecuteReader
              Return rs
            Catch ex As Exception
              Debug.WriteLine("Errore nella query:" & ex.Message)
            End Try
          Catch ex As Exception
            Debug.WriteLine("Errore in connessione")
          Finally
            If oleDbConn.State <> ConnectionState.Closed Then
              oleDbConn.Close()
            End If
          End Try
    poi l'oggetto rs lo usi come usavi quello di Vb6 (vb script)
    -----
    101110101011101111100000
    -----

  3. #3
    Originariamente inviato da xam85reBanned
    codice:
    Private Function creaRs(ByVal strSql As String) As OleDb.OleDbDataReader
        Dim rs As OleDb.OleDbDataReader
        Dim cmdSql As OleDb.OleDbCommand
        Dim oleDbConn As OleDb.OleDbConnection
        Try
          cmdSql.CommandText = strSql
          oleDbConn.ConnectionString = strConnessione
          cmdSql.Connection = oleDbConn
          Try
            oleDbConn.Open()
            Try
              rs = cmdSql.ExecuteReader
              Return rs
            Catch ex As Exception
              Debug.WriteLine("Errore nella query:" & ex.Message)
            End Try
          Catch ex As Exception
            Debug.WriteLine("Errore in connessione")
          Finally
            If oleDbConn.State <> ConnectionState.Closed Then
              oleDbConn.Close()
            End If
          End Try
    poi l'oggetto rs lo usi come usavi quello di Vb6 (vb script)
    Grazie...lo provo subito ed in caso di domande continuo su questa discussione.
    Despite of my rage i'm still just a rat in a cage

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2026 vBulletin Solutions, Inc. All rights reserved.