• Domingo 6 de Julio de 2025, 14:39

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - necros10

Páginas: 1 [2]
26
VB .NET / Duda Con Validar Fechas
« en: Jueves 18 de Octubre de 2007, 01:17 »
hola amigos

tengo la siguente duda como hago para validar la fecha q me ingresa el usuario en un textbox ??

el usuario ingresa la fecha de la sgte manera

ej:  01/01/07

ojala me puedan ayudar porq no cacho como se hace

PD: la idea esq tb sea estable por los años bisiestos

27
VB .NET / Re: Ayuda En Bd Con Vb 2005
« en: Miércoles 8 de Agosto de 2007, 01:27 »
CODE [
Y eso pa'que ?

Lo que tenes que hacer es :
1. El usuario ya pass estan en una tu tabla de la BD o son usuarios del SQL Server ?
2. Si son de una tabla xxx de tu BD
obtengo_usuario = " Select nombre
from tu_tabla
where id = " & text1.text
& " and pass = " & text2.text

El login o nombre del usuario se lo asignas a un variable luego haces la comparacion o no se como vas a hacer la comparacion y solo ver si la variable no es NULL ya que si lo es es porque no coincide el id con el pass ....  ...

Bueno espero te sirva y si tienes dudas pues solo postea tu duda  .

]
 
1. el usuario y la pass estan en la BD y no son Usuarios de SQL
2.Ahora Intentare lo que medices porq realmente no cacho como hacerlo

y esa linea que habia colocado era lo que se me habia ocurrido en el momento aunq sabia que estaba mala

28
VB .NET / Re: Ayuda En Bd Con Vb 2005
« en: Martes 7 de Agosto de 2007, 00:09 »
parece que no tengo ayuda :(:(:(:(

29
VB .NET / Ayuda En Bd Con Vb 2005
« en: Sábado 4 de Agosto de 2007, 20:40 »
tengo el sgte problema...quiero buscar el nombre de usuario en la BD y ver si existe o no y asi darle paso a q ingrese su Password ,(tambien verificaría en la BD su clave) pero no cacho como poder hacerlo  este es el codigo que llevo.

EN EL FORM

Imports System.Data.SqlClient
Public Class Form1
    Dim I As String
    Private Sub TxtUser_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TxtUser.KeyPress
        If e.KeyChar.IsLetter(e.KeyChar) Then
            e.Handled = False
        ElseIf e.KeyChar.IsSeparator(e.KeyChar) Then
            e.Handled = False
        ElseIf e.KeyChar.IsControl(e.KeyChar) Then
            e.Handled = False
            TxtUser.Text = Trim(TxtUser.Text)
            I = Len(TxtUser.Text) 'LEN = Cuenta numero de caracteres de la cadena
            If e.KeyChar = Chr(13) And I <> 0 Then
                TxtUser.Text = StrConv(TxtUser.Text, vbLowerCase) ' CAMBIA TODA LA CADENA A minuscula
                conectar()
                cargardatos()
                'AQUI LA DUDA
                tabb = New SqlCommand(" if Select nombre from usuario =  " & (TxtUser.Text))
                MessageBox.Show("Ingreso Ok", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information)
                TxtPass.Focus()
                tabb = New SqlCommand("else")
                tabb = New SqlCommand("end if")
            End If
        Else
            MessageBox.Show("Ingrese solo letras", "Information", MessageBoxButtons.OK, MessageBoxIcon.Warning)
            e.Handled = True
        End If
    End Sub
    Public Sub cargardatos()
        tabb = New SqlCommand("select * from usuario", conn)
        dadap.SelectCommand = tabb
        dadap.Fill(dset, "usuario")
    End Sub
End Class

EN EL MODULO

Imports System
Imports System.Data
Imports System.Data.SqlClient
Module Module1
    Friend conn As SqlConnection
    Friend tabb As SqlCommand
    Friend dadap As SqlDataAdapter
    Friend dset As DataSet
    Public Sub conectar()
        conn = New SqlConnection
        tabb = New SqlCommand
        dadap = New SqlDataAdapter
        dset = New DataSet
        'Nombre BD Mantenedor
        With conn
            .ConnectionString = "Initial Catalog= Mantenedor;" & _
                                "Data Source = localhost;" & _
                                "Integrated Security= SSPI"
            .Open()

        End With
        MessageBox.Show("OK")
    End Sub
End Module

Agradeceria su ayuda

30
SQL Server / Re: Ayuda Con Procedimiento De Almacenado
« en: Jueves 7 de Junio de 2007, 17:55 »
create database ejerjuevest31
use ejerjuevest31

create table Descuento(
   codigo_dcto  numeric constraint pkdescuento primary key(codigo_dcto ),
   anticipo numeric,
   dcto_afp numeric,
   dcto_isapre numeric

);

create table Haber(
   cod_haberes numeric constraint pkhaberes primary key(cod_haberes),
   pago_h_ext numeric,
   bono numeric,
   gratifi numeric,
   aguinaldo numeric
);
create table DatosP(
   rut char(12) constraint pkdatosp primary key(rut),
   nombre varchar(50),
   direccion varchar(50),
   nombre_afp varchar(30),
   nom_isapre varchar(30),
   fono numeric,
   edad numeric,
   sliquido numeric
);
create table calsueldo(
   cod_trab numeric constraint pkcalsueldo primary key(cod_trab),
   rut char(12) constraint fkdatosp foreign key references DatosP(rut),   
   codigo_dcto numeric constraint fkdescuento foreign key references Descuento(codigo_dcto ),
   total_dcto numeric,
   cod_haberes numeric constraint fkhaber foreign key references Haber(cod_haberes),
   total_haber numeric
);
drop table calsueldo



insert into datosP values('11.111.111-1','Juan Perez','alameda 42','Habitad','Banmedica',111222,30,NULL);

insert into haber values(101,null,30000,15000,50000);

insert into descuento values(201,30000,15000,11000);

insert into calsueldo values(301,'11.111.111-1',201,null,101,null);

- actualize 2 registros de la tabla descuento y quequee el campo 'Total_dto' en la tabla calsueldo( se debe actualizar )
*/
update Descuento set anticipo=5000,dcto_afp=10000,dcto_isapre=5000 where codigo_dcto =201
update descuento set anticipo=8000,dcto_afp=15000,dcto_isapre=5000 where codigo_dcto =202


create procedure CalDescuento
@codigo_dcto numeric
as
declare @total_dcto numeric
declare @anticipo numeric
declare @dcto_afp numeric
declare @dcto_isapre numeric
select @anticipo = (anticipo),@dcto_afp=(dcto_afp),@dcto_isapre=(dcto_isapre) from descuento where @codigo_dcto =codigo_dcto
select @total_dcto=(total_dcto) from calsueldo where @codigo_dcto =codigo_dcto

/* reparar*/
set @anticipo=(anticipo)
set @dcto_afp=(dcto_afp)
set @dcto_isapre=(dcto_isapre)
set @total_dcto = (@dcto_isapre+@dcto_afp)+@anticipo

update calsueldo set total_dcto=@total_dcto where codigo_dcto =@codigo_dcto
select * from calsueldo where  codigo_dcto =@codigo_dcto

execute CalDescuento 201

eso es y tengo q ir actualizando en cascada

31
SQL Server / Re: Ayuda Con Procedimiento De Almacenado
« en: Jueves 7 de Junio de 2007, 17:29 »
eso lo hace pero necesito hacer actualizaciones a registros sin modificar el procedimiento , es decir, que el nombre de la tabla intentar de ocuparlo como variable en el procedimiento para q asi pueda ejecutarlo sin problemas y actualizar las tablas tambien

32
SQL Server / Re: Ayuda Con Procedimiento De Almacenado
« en: Jueves 7 de Junio de 2007, 16:49 »
intento deactualizar la tabla

update Descuento set anticipo=7000,dcto_afp=10000,dcto_isapre=5000 where codigo_dcto =201

en el procedimiento

set @anticipo=(anticipo)
actulizo en el procedimiento

update calsueldo set total_dcto=@total_dcto where codigo_dcto =@codigo_dcto

33
SQL Server / Ayuda Con Procedimiento De Almacenado
« en: Jueves 7 de Junio de 2007, 06:48 »
tengo la sgte duda quiero actualizar una tabla x y q esta tabla optenga un valor "5000" por ejemplo

pero en el P.A quier q me haga calculos con esta tabla con valores actualizados ya no quiero ir dropiando y crando el procedimiento

set @dcto_afp=dcto_afp

asi lo tengo y esta malo comoo podria ser?

Atte El unico Necros

PD: estoy actualizando tablas en cascada hacia arriba el update general lo tengo listo solo topo en la actualizacion de registros

34
VB .NET / Duda Modulo En Vb2005
« en: Martes 1 de Mayo de 2007, 04:37 »
hola amigos soy novato en esto de vb2005 y quisiera saber como puedo enviar los datos de los textbox, combobox...etc hacia el modulo correspondiente y q se declara para q este los reciva.... no se si me entienden agradeceria sus respuestas

35
SQL Server / Re: Duda Con Update
« en: Martes 24 de Abril de 2007, 22:29 »
La consulta se refiere a como puedo hacer los updates en cascada hacia abajo y hacia arriba....arias una sentencia porfa para cacharte mejor

36
SQL Server / Duda Con Update
« en: Martes 24 de Abril de 2007, 03:24 »
hola amigos como estan soy nuevo en este foro y me gusto demasiado ya q esta todo lo q un informatico necesita, bueno basta de agradecimientos (por ahora) y vamos a lo q interesa..
mi duda es la sgte mi profe de inacap nos pide q hagamos unos upates a unas tablas q eso lo se hacer pero luego nos pide q hagamos updates a distintas tablas q esten directamente relacionadas y es ahi donde cago porq no me resulta en una sola sentencia mi duda es como es para lograr eso ya q separo las tablas con comas ,() y nada q se puede hacer?????......

agradeceria sus respuestas masters...


aps se me olvidaba nos hace trabajar con contraint con sus referncias fk y pk y trabajamos con el sql 7.0  ojala sirva este dato :devil:  :devil:

Páginas: 1 [2]