Visualizzazione dei risultati da 1 a 4 su 4
  1. #1
    Utente di HTML.it L'avatar di Kahm
    Registrato dal
    Dec 2004
    residenza
    Rome
    Messaggi
    3,550

    [vb.net] da access a sqlserver

    salve a tutti
    Mi hanno chiesto di migrare un progetto asp.net che utilizza access su SqlServer,
    i dubbi sono 2:
    -Oledb è compatibile con sqlServer?
    -i parametri posso dargli un nome? ricordo il mio ultimo progetto gli davo il "?" come punto
    -SELECT@@IDENTITY lo gestisce anche sqlSerer? il codice lo usa per avere il contatore per l'ultima connessione per i campi autonumber

    qui sotto una piccola routine del programma:
    si intravede bene che utilizza i driver Oledb, si nota come ritorna il contatore con @@Identity ed i vari parametri del command

    ecco le domande
    -Secondo voi è tutto da rifare da zero?
    -me la cavo con poche modifiche?
    -va bene cosi ed è riusabile?

    grazie
    codice:
     Public Function Inserisci(Optional ByVal UseTransaction As Boolean = False) As Integer
            strSql = "INSERT INTO RigheOrdineFornitore ( Descrizione,RcodOrdine,RcodArticolo,quantita,peso,iva,RcodTipologia) " &
            " VALUES (@Descrizione,@RcodOrdine,@RcodArticolo,@quantita,@Peso,@Iva,@RcodTipologia)"
            CMD = New OleDbCommand(strSql, Conn)
            With CMD
    
    
                .Parameters.Add("@Descrizione", OleDbType.VarChar).Value = Descrizione & ""
                .Parameters.Add("@RcodOrdine", OleDbType.Integer).Value = RcodOrdine
                .Parameters.Add("@RcodArticolo", OleDbType.Integer).Value = RcodArticolo
                .Parameters.Add("@Quantita", OleDbType.Double).Value = Quantita
                .Parameters.Add("@Peso", OleDbType.VarChar).Value = Peso & ""
                .Parameters.Add("@Iva", OleDbType.Double).Value = Iva & ""
                .Parameters.Add("@RcodTipologia", OleDbType.Integer).Value = IIf(RcodTipologia = 0, DBNull.Value, RcodTipologia)
    
    
                If UseTransaction Then .Transaction = mvTrans
                .ExecuteNonQuery()
            End With
            CMD = Nothing
    
    
    
    
            Dim COntatore As Long
            Dim cmdC As OleDbCommand = New OleDbCommand("SELECT@@IDENTITY", Conn)
            COntatore = CType(cmdC.ExecuteScalar, Integer)
            Return COntatore
        End Function
    NN vi diro mai chi sono in realta,
    tutti i miei 3D sono orfani, non insistete per farmi rispondere ai 3D aperti da me

  2. #2
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,301
    Quote Originariamente inviata da Kahm Visualizza il messaggio
    -Oledb è compatibile con sqlServer?
    Se hai il driver OLE DB per SQL Server, sì.

    Quote Originariamente inviata da Kahm Visualizza il messaggio
    -i parametri posso dargli un nome? ricordo il mio ultimo progetto gli davo il "?" come punto
    Sì. In genere, è su Access che c'erano limiti all'uso di nomi di parametri.

    Quote Originariamente inviata da Kahm Visualizza il messaggio
    -SELECT@@IDENTITY lo gestisce anche sqlSerer?
    Sì.

    Quote Originariamente inviata da Kahm Visualizza il messaggio
    -Secondo voi è tutto da rifare da zero?
    -me la cavo con poche modifiche?
    -va bene cosi ed è riusabile?
    Indicativamente non sembra un lavoro gravoso, ma tutto dipende anche da come hai strutturato il codice, come hai separato i layer (se lo hai fatto), ecc.

    Ciao!
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

  3. #3
    Utente di HTML.it L'avatar di Kahm
    Registrato dal
    Dec 2004
    residenza
    Rome
    Messaggi
    3,550
    ho fatto un piccolo progettino a parte e cercato di utilizzare questa funzione

    "'Dichiarare la variabile scalare "@P1Descrizione".'
    non capisco, sembra che non gli piaccia come è strutturata la query, oppure non riconosce il parametro
    NN vi diro mai chi sono in realta,
    tutti i miei 3D sono orfani, non insistete per farmi rispondere ai 3D aperti da me

  4. #4
    Moderatore di Programmazione L'avatar di alka
    Registrato dal
    Oct 2001
    residenza
    Reggio Emilia
    Messaggi
    24,301
    Quote Originariamente inviata da Kahm Visualizza il messaggio
    ho fatto un piccolo progettino a parte e cercato di utilizzare questa funzione
    Posta il codice aggiornato.

    Quote Originariamente inviata da Kahm Visualizza il messaggio
    "'Dichiarare la variabile scalare "@P1Descrizione".'
    non capisco, sembra che non gli piaccia come è strutturata la query, oppure non riconosce il parametro
    Senza vedere la query SQL risultante, è difficile capire il motivo e si possono fare solo supposizioni, come quelle che hai già avanzato.
    MARCO BREVEGLIERI
    Software and Web Developer, Teacher and Consultant

    Home | Blog | Delphi Podcast | Twitch | Altro...

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 © 2024 vBulletin Solutions, Inc. All rights reserved.