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...
I prezzi di questi TV 4K Hisense 2024 e ...
Estate calda anche su Amazon: ribassi co...
Galaxy Z Fold 7 e Flip 7 oltre le aspett...
Recensione Synology DS1525+: tanti disch...
DualSense PS5 senza più limiti, p...
Renault 5 è un successo: quasi 50...
3 tablet in offerta, 99€, 132€ o 209€: p...
SK hynix registra profitti record e punt...
Sonos nomina il nuovo CEO dopo il disast...
Dyson in forte sconto su Amazon: effetto...
Oggi è l'Overshoot Day 2025: perc...
Tesla conferma la produzione delle prime...
La ricarica wireless diventa più ...
AI Action Plan: Trump punta su meno rego...
Aeneas: ecco l'IA che riporta in vita le...
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: 10:43.


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