No entiendo el error

[astrow25]

Hola,tengo este codigo

Dim oMaxSocios As New SqlConnection
oMaxSocios.ConnectionString = "Server=(local);Database=Socios;Trusted_Connection =True;"
Dim oCommandSocios As New SqlCommand("Select MAX(NUMREGISTRO) as NUMREGISTRO from SOCIOS", oMaxSocios)
Dim oDataMaxSocios As SqlDataReader
oMaxSocios.Open()
oDataMaxSocios = oCommandSocios.ExecuteReader
If oDataMaxSocios.HasRows() Then
MsgBox("SI")
Else
MsgBox("NO")
End If
Lo que hago es que coga el maximo registro de un tabla y luego sumar uno, pero lo que pasa es que la bd actualmente no tiene ningun registro, y cuando pregunto HasRows me salta dentro, y me sale el Msgbox SI, es decir que sin tener ningun registro cuando pregunto si hay registros lo toma porque si hay

Espero haberme explicado bien, muchas gracias por vuestra colaboracion

[Andres95]

porque probablemente el max te devuelve un record con un cero. (que seria el valor maximo cuando no hay registros).

Si lo que requieres es solo un valor, es recomendable no utilizar un dataset (el reader) sino utilizar un parametro de tipo output en un sp.

Seria algo como :

En el SQL ....

Create procedure spGetMaxRecord
@resultado int output
AS
Set @resultado = 0
Select @resultado = MAX(NUMREGISTRO) as NUMREGISTRO from SOCIOS
Set @resultado = isnull(@resultado,0)



En el Visual Studio.

Código:

        Dim cmd As SqlCommand = New SqlCommand(spGetMaxRecord, oMaxSocios)
        cmd.Parameters.Add("@resultado", 0)
        cmd.Parameters(0).Direction = ParameterDirection.Output
        cmd.ExecuteNonQuery()

        If cmd.Parameters(0).Value = 0 Then
            MsgBox("SI")
        Else
            MsgBox("NO")
        End If

algo asi...

[Nombela]

Normalmente lo del calculo del maximo si lo quieres hacer es con:

ExecuteScalar(): retorna un único valor; ej: una suma, un campo q tiene un valor único, etc. Sería así:
SqlCommand tu_comando=new SqlCommand("SELECT MAX edad FROM Personas",tu_conexion);
int i = tu_comando_sql.ExecuteEscalar();


Por cierto no es recomendable porque si entran varios usuarios a la vez podria dar problemas.
http://www.forosdelweb.com/showthrea...ghlight=select

[Andres95]

realmente no veo el problema... si es autonumerico no tienes porque incluirlo en el insert, y si es necesario mostrar con que id quedo el registro para el usuario, esto seria despues de haber realizado la insercion... y si lo requiere antes se le muestra en el entendido de que puede variar dependiendo del tiempo que tarde en realizar la entrada y los usuarios que esten realizando transacciones.

bueno asi lo manejo yo...

un saludo

[astrow25]

He probado a hacer lo que me dices y me da 2 errores

1º En el sql me da error en la linea
Select @resultado = MAX(NUMREGISTRO) as NUMREGISTRO from SOCIOS

2º En vb.net el spGetMaxRecord no lo reconoce

Iniciado por Andres95

porque probablemente el max te devuelve un record con un cero. (que seria el valor maximo cuando no hay registros).

Si lo que requieres es solo un valor, es recomendable no utilizar un dataset (el reader) sino utilizar un parametro de tipo output en un sp.

Seria algo como :

En el SQL ....

Create procedure spGetMaxRecord
@resultado int output
AS
Set @resultado = 0
Select @resultado = MAX(NUMREGISTRO) as NUMREGISTRO from SOCIOS
Set @resultado = isnull(@resultado,0)



En el Visual Studio.

Código:

        Dim cmd As SqlCommand = New SqlCommand(spGetMaxRecord, oMaxSocios)
        cmd.Parameters.Add("@resultado", 0)
        cmd.Parameters(0).Direction = ParameterDirection.Output
        cmd.ExecuteNonQuery()

        If cmd.Parameters(0).Value = 0 Then
            MsgBox("SI")
        Else
            MsgBox("NO")
        End If

algo asi...

[Andres95]

solo hay que quitarle el alias al sql.

Código:

Create procedure spGetMaxRecord
@resultado int output
AS 
Set @resultado = 0
Select @resultado = MAX(NUMREGISTRO) from SOCIOS
Set @resultado = isnull(@resultado,0)

el vb te truena porque no has creado el sp .. (ya que enviaba error)

para probar que el sp este listo y funcionando correctamente puedes utilizar el Query Analizer y probar tu sp creado, de la siguiente forma.

Código:

Declare @retorno int
Execute spGetMaxRecord @retorno
print @retorno

si regresa bien la informacion entonces puede continuar con tu codigo de vb.net