Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 .NET
 ut procedures en asp.net
 Foro Bloqueado  Tema Bloqueado


Autor Temas
miguelonnn
Starting Member

Peru
7 Posts
Mensajes - 26 Mar 2005 :  03:31:32  Ver Perfil  Enviar Email
mi problemaa es esteee ess q quieroo añadirr a untaa tablaa en sql unoss datoss he estado intentando y no me a salidoo

estee es mi procedimiento funciona ok


SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO

create PROCEDURE SGL_INS01_SUGERENCIAS
(@socio varchar(200),
@titulo varchar(300),
@mensaje varchar(3000))
AS
BEGIN TRANSACTION
DECLARE @ULTIMO SMALLINT

SELECT @ULTIMO = CASE WHEN MAX(numero)IS NULL THEN 1
ELSE MAX(numero) + 1
END
FROM sugerencia

INSERT sugerencia(numero,socio,titulo,mensaje,fecha)
VALUES (@ultimo,@socio,@titulo,@mensaje,convert(datetime,getdate(),103))
COMMIT TRANSACTION

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

//------------------------------------------------------------

esto ess lo q he hechoo peroo no añadee no se por q si el procedimiento funcionaa okk qq faltaa paraa q funcionee porr favorrr help meeee

//-----------------------------------------------------------

web.config

<appSettings>

<add key="CadenaConexion" value="Initial catalog=club; Data Source=(local); UID=sa; pwd=;" />

</appSettings>

//-----------------------------------------------------------

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim socio As String = Request.Params("txtitulo")

Dim titulo As String = Request.Params("txtitulo")

Dim sugerencia As String = Request.Params("txsugerencia")

Dim strCadena As String = ConfigurationSettings.AppSettings("CadenaConexion")

Dim mycommand As New SqlClient.SqlCommand

mycommand.Connection = New SqlConnection(strCadena)

mycommand.CommandType = CommandType.StoredProcedure

mycommand.CommandText = "SGL_INS01_SUGERENCIAS"

Dim Par As New SqlClient.SqlParameter("@socio", SqlDbType.VarChar, 100)

Dim Parametro As New SqlClient.SqlParameter("@titulo", SqlDbType.VarChar, 200)

Dim Categoria As New SqlClient.SqlParameter("@mensaje", SqlDbType.VarChar, 2500)

Par.Value = socio

Parametro.Value = titulo

Categoria.Value = sugerencia

'INSERTO EL PARAMETRO EN EL DA. PARA LUEGO LLENAR EL DS

mycommand.Parameters.Add(Par)

mycommand.Parameters.Add(Parametro)

mycommand.Parameters.Add(Categoria)

mycommand.Connection.Open()

mycommand.ExecuteNonQuery()

mycommand.Connection.Close()

End Sub


   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar