elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Como rellenar campos en vb
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Como rellenar campos en vb  (Leído 4,410 veces)
fedefrankk

Desconectado Desconectado

Mensajes: 23


Ver Perfil
Como rellenar campos en vb
« en: 18 Septiembre 2008, 07:05 am »

Hola a todos tengo el siguiente codigo

Código:
 x = "insert into stock values (" & Val(Text1) & ",'" & Text2 & "'," & Val(Text3) & "," & Val(Text4) & "," & Val(Text5) & ")"
            conexion_basedatos.Execute x
Quisiera rellenar los campos no se si se puede con un while y random en cada text, el text1 es numerico nomas.. el text2 es texo, el 3,4,5 son numeros de 3 cifras.. si alguin me da una ayudita.. gracias
saludos federico


En línea

seba123neo
Moderador
***
Desconectado Desconectado

Mensajes: 3.621



Ver Perfil WWW
Re: Como rellenar campos en vb
« Respuesta #1 en: 18 Septiembre 2008, 22:54 pm »

Hola, al INSERT INTO le tenes que decir los campos a insertar ahi solo pones los valores...es algo asi:

Código:
INSERT INTO Clientes (campo1,campo2) VALUES (valorcampo1,valorcampo2)

saludos.




En línea

ssccaann43 ©


Desconectado Desconectado

Mensajes: 792


¬¬


Ver Perfil
Re: Como rellenar campos en vb
« Respuesta #2 en: 19 Septiembre 2008, 03:47 am »

1ero, que base de datos estás usando?

Por qué la pregunta?

Pues porque en access puedes colocar '" & Text1.Text & "' asi el campo sea numerico y lo acepta... Pero si es SQL Server pues le quitas las comillas simples...

2do, coloca los campos completos y te escribo el query. Un saludo.

Nota: Pero es como te lo explica seba123neo...  ;D
En línea

- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"
fedefrankk

Desconectado Desconectado

Mensajes: 23


Ver Perfil
Re: Como rellenar campos en vb
« Respuesta #3 en: 19 Septiembre 2008, 04:37 am »

Hola gracias por las respuesta, la base de datos es acces y lo que en realidad necesito es llenar por ejemplo 100 campos de la base de datos, automaticamente..
gracias
fede
En línea

seba123neo
Moderador
***
Desconectado Desconectado

Mensajes: 3.621



Ver Perfil WWW
Re: Como rellenar campos en vb
« Respuesta #4 en: 19 Septiembre 2008, 04:41 am »

pues si entonces es eso, lo podes hacer con un bucle For...For Variable = 0 to 100 haces el INSERT INTO...pero fijate de ir cambiando los valores mientras insertas porque  te puede dar un error de clave duplicada si un campo es clave de la tabla...

saludos.
En línea

fedefrankk

Desconectado Desconectado

Mensajes: 23


Ver Perfil
Re: Como rellenar campos en vb
« Respuesta #5 en: 19 Septiembre 2008, 05:04 am »

Hola si pense algo asi mira ..
Código:
Private Sub Command1_Click()
For x = 1 To 100

    Dim Num As Byte
    Num = Int(255 - 1) * Rnd + 0
    Text1.Text = Num
    Next x
   
End Sub
y rellenar todo los campos..
seria asi?
saludos y grax

En línea

fedefrankk

Desconectado Desconectado

Mensajes: 23


Ver Perfil
Re: Como rellenar campos en vb
« Respuesta #6 en: 19 Septiembre 2008, 05:45 am »

Hola lo hice pero me sale error que el objeto esta abierto aca dejo el codigo, lo que quiero hacer es que si busca y encuentra, que no grabe, si no encuentra que grabe los datos en num1 que es el unico que no puede ser duplicado..

Código:
Private Sub Command1_Click()
Dim Num1 As Byte
Dim Num2 As Byte
Dim Num3 As Byte
Dim Num4 As Byte
Dim Num5 As Byte
Call abrir


Num1 = Int(255 - 1) * Rnd + 0
Num2 = Int(255 - 1) * Rnd + 0
Num3 = Int(255 - 1) * Rnd + 0
Num4 = Int(255 - 1) * Rnd + 0
Num5 = Int(255 - 1) * Rnd + 0
For Num1 = 1 To 100
For Num2 = 1 To 100
For Num3 = 1 To 100
For Num4 = 1 To 100
For Num5 = 1 To 100
  'conexion_basedatos.Close
x = "Select * from stock where codigo =" & Val(Num1) & " "
tablas_apertura.Open x, conexion_basedatos
Next Num5
         Next Num4
         Next Num3
         Next Num2
         Next Num1
         conexion_basedatos.Close
         
If tablas_apertura.EOF = True And tablas_apertura.BOF = True Then
x = "insert into stock values (" & Val(Num1) & ",'" & Num2 & "'," & Val(Num3) & "," & Val(Num4) & "," & Val(Num5) & ")"
     'conexion_basedatos.Execute x
       
            MsgBox "Se grabo correctamente"
       Else
                 
         
         
         End If
End Sub


y el modulo es :

Código:
Public conexion_basedatos As New ADODB.Connection
Public tablas_apertura As New ADODB.Recordset
Global datos As String

Sub abrir()
conexion_basedatos.ConnectionString = App.Path + "\BASE_DATOS_STOCK.mdb"
conexion_basedatos.Provider = "microsoft.jet.oledb.4.0"
conexion_basedatos.Open

End Sub
Sub cerrar()
conexion_basedatos.Close
End Sub

Saludos
Federico .
En línea

ssccaann43 ©


Desconectado Desconectado

Mensajes: 792


¬¬


Ver Perfil
Re: Como rellenar campos en vb
« Respuesta #7 en: 19 Septiembre 2008, 21:49 pm »

Dentro del for abre la bd ejecutas el query y la cierras... No puedes mantener la conex abierta y ejecutar querys porque te generara ese error...
En línea

- Miguel Núñez
Todos tenemos derechos a ser estupidos, pero algunos abusan de ese privilegio...
"I like ^TiFa^"
seba123neo
Moderador
***
Desconectado Desconectado

Mensajes: 3.621



Ver Perfil WWW
Re: Como rellenar campos en vb
« Respuesta #8 en: 19 Septiembre 2008, 22:12 pm »

hay hay hay ese codigo se puede reducir un monton ,no se para que tantos bucles FOR si con uno basta y sobra...

saludos.
En línea

fedefrankk

Desconectado Desconectado

Mensajes: 23


Ver Perfil
Re: Como rellenar campos en vb
« Respuesta #9 en: 19 Septiembre 2008, 22:20 pm »

Hola, si se que se puede ahorrar codigo, me darian una mano.. porque se hasta hay nomas, estuve buscando en google y nada encontre.
saludos a todos
fede
En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
como validar campos en sql
.NET (C#, VB.NET, ASP)
Elmonky 1 3,173 Último mensaje 13 Febrero 2012, 23:15 pm
por Elmonky
ASP; Cómo uso datos de un XML para rellenar un gráfico con Chart
.NET (C#, VB.NET, ASP)
|Miguel| 1 2,848 Último mensaje 9 Mayo 2012, 10:31 am
por |Miguel|
¿Cómo ordenar un ArrayList de elementos-registro según uno de sus campos?
Java
reygecko 1 4,566 Último mensaje 17 Enero 2013, 00:00 am
por reygecko
Ayuda rellenar campos para inicio de sesion de un dvr en php
PHP
keramon222 0 1,790 Último mensaje 13 Junio 2013, 18:55 pm
por keramon222
como reservar campos en tablas
Bases de Datos
cardlim 0 2,079 Último mensaje 11 Septiembre 2016, 14:24 pm
por cardlim
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines