Torna indietro   Hardware Upgrade Forum > Software > Programmazione

Samsung Galaxy S25 Edge: il top di gamma ultrasottile e leggerissimo. La recensione
Samsung Galaxy S25 Edge: il top di gamma ultrasottile e leggerissimo. La recensione
Abbiamo provato il nuovo Galaxy S25 Edge, uno smartphone unico per il suo spessore di soli 5,8 mm e un peso super piuma. Parliamo di un device che ha pro e contro, ma sicuramente si differenzia dalla massa per la sua portabilità, ma non senza qualche compromesso. Ecco la nostra prova completa.
HP Elitebook Ultra G1i 14 è il notebook compatto, potente e robusto
HP Elitebook Ultra G1i 14 è il notebook compatto, potente e robusto
Pensato per il professionista sempre in movimento, HP Elitebook Ultra G1i 14 abbina una piattaforma Intel Core Ultra 7 ad una costruzione robusta, riuscendo a mantenere un peso contenuto e una facile trasportabilità. Ottime prestazioni per gli ambiti di produttività personale con un'autonomia lontano dalla presa di corrente che permette di lavorare per tutta la giornata
Microsoft Surface Pro 12 è il 2 in 1 più compatto e silenzioso
Microsoft Surface Pro 12 è il 2 in 1 più compatto e silenzioso
Basato su piattaforma Qualcomm Snapdragon X Plus a 8 core, il nuovo Microsoft Surface Pro 12 è un notebook 2 in 1 molto compatto che punta sulla facilità di trasporto, sulla flessibilità d'uso nelle differenti configurazioni, sul funzionamento senza ventola e sull'ampia autonomia lontano dalla presa di corrente
Tutti gli articoli Tutte le news

Vai al Forum
Rispondi
 
Strumenti
Old 09-12-2009, 23:37   #1
bertani8
Senior Member
 
L'Avatar di bertani8
 
Iscritto dal: Jul 2002
Messaggi: 1608
[VB6 - Stored Procedure sql2005]

devo eseguire una stored procedure su sql passando dei parametri da vb6:
vi posto quello che ho scritto, ma mi ritorna un errore nel recordset (
l' operazione non è cosentita se l' oggetto è chiuso)

set ANSI_NULLS ON
set QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[spWrkOrdiniImpegniGetLastNumber]
@TipoDocumento int,
@DocAnno int,
@DocAlfa VarChar(2)
As
Declare @DocProgressivo int
Select Top 1 @DocProgressivo = DocProgressivo
From OrdiniImpegni
Where TipoDocumento = @TipoDocumento And DocAnno = @DocAnno And IsNull(DocAlfa,'') = @DocAlfa And DocProgressivo <> 0
Order by DocProgressivo DESC
Set @DocProgressivo = IsNull(@DocProgressivo,0) + 1
Return @DocProgressivo


IL CODICE VB6

TipoDocumento = 54002
DocAnno = 2009
DocAlfa = "I"

Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
With cmd
.ActiveConnection = CNSQL
.CommandType = adCmdStoredProc
.CommandText = "spWrkOrdiniImpegniGetLastNumber"
.Parameters.Append cmd.CreateParameter_
("@tipodocumento", adInteger, adParamInput, 6, TipoDocumento)
.Parameters.Append cmd.CreateParameter_
("@docanno", adInteger, adParamInput, 4, DocAnno)
.Parameters.Append cmd.CreateParameter_
("@docalfa", adVarChar, adParamInput, 2, DocAlfa)
End With

Set TMP = New ADODB.Recordset
Set TMP = cmd.Execute

If Not TMP.EOF Then
txt_number = TMP.Fields(0)
End If

PS: CNSQL (la stringa di connessione a sql è ok)

HELP ME!
grazie in anticipo
__________________
Asus P8P67 DLX, I7-2600K @ 4.00 Ghz, Thermalright True120, 8Gb Corsair Vengeance 1600 Mhz; gtx 760 DCII 2gb, Corsiar 520W, Cooler Master Cosmos 1000, SSD Corsair GT sata3 120Gb, 2 x WD 2TB + WD 500Gb+400Gb+ ..+ ..~ƒ☺

Ultima modifica di bertani8 : 09-12-2009 alle 23:47.
bertani8 è offline   Rispondi citando il messaggio o parte di esso
 Rispondi


Samsung Galaxy S25 Edge: il top di gamma ultrasottile e leggerissimo. La recensione Samsung Galaxy S25 Edge: il top di gamma ultraso...
HP Elitebook Ultra G1i 14 è il notebook compatto, potente e robusto HP Elitebook Ultra G1i 14 è il notebook c...
Microsoft Surface Pro 12 è il 2 in 1 più compatto e silenzioso Microsoft Surface Pro 12 è il 2 in 1 pi&u...
Recensione REDMAGIC Astra Gaming Tablet: che spettacolo di tablet! Recensione REDMAGIC Astra Gaming Tablet: che spe...
Dopo un mese, e 50 foto, cosa abbiamo capito della nuova Nintendo Switch 2 Dopo un mese, e 50 foto, cosa abbiamo capito del...
La cometa interstellare 3I/ATLAS potrebb...
Un triste giorno per l'industria videolu...
Il tuo mouse ti spia? La suite di gestio...
Proton presenta Lumo: l'assistente AI co...
Samsung Galaxy S26 Edge: più auto...
Escobar Inc.: una frode che porta il mar...
Apple e la smart home in arrivo? Nuovo H...
Anche Alfa Romeo lancia il suo incentivo...
Un braccialetto che ascolta e registra o...
OPPO Find X8 Ultra: il RE dei cameraphon...
DeepL sempre più potente: arrivan...
Addio a Shunsaku Tamiya, il papà ...
Il volontariato non può essere gr...
Baxi presenta le nuove pompe di calore a...
Solo 104€ per questo robot Lefant da 500...
Chromium
GPU-Z
OCCT
LibreOffice Portable
Opera One Portable
Opera One 106
CCleaner Portable
CCleaner Standard
Cpu-Z
Driver NVIDIA GeForce 546.65 WHQL
SmartFTP
Trillian
Google Chrome Portable
Google Chrome 120
VirtualBox
Tutti gli articoli Tutte le news Tutti i download

Strumenti

Regole
Non Puoi aprire nuove discussioni
Non Puoi rispondere ai messaggi
Non Puoi allegare file
Non Puoi modificare i tuoi messaggi

Il codice vB è On
Le Faccine sono On
Il codice [IMG] è On
Il codice HTML è Off
Vai al Forum


Tutti gli orari sono GMT +1. Ora sono le: 20:13.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Served by www3v