Visual Basic - set MEN

Life is soft - evento anual de software empresarial
   
Vista:

set MEN

Publicado por sace (41 intervenciones) el 13/04/2010 06:46:38
Dim MEN As String
If MEN = Data6.Recordset.Fields("nrofacturas") Then
Data6.RecordSource = "SELECT * FROM consulta1 where nrofacturas = " & MEN & ""

eso lo hace bien con el primer valor que le meta en el MEN, luego no cambia la variable MEN, como la reseteo?? para que en realidad sea una variable

GRACIAS :)
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:set MEN

Publicado por Tatayayan (35 intervenciones) el 13/04/2010 17:19:32
Esto lo que tu planteas

Dim MEN As String
If MEN = Data6.Recordset.Fields("nrofacturas") Then
Data6.RecordSource = "SELECT * FROM consulta1 where nrofacturas = " & MEN & ""

Yo no te entiendo bien pero te digo que la variable al estar en una subrutina "se vuelve nada" o "cero" con el Dim, pero si colocas la variable en la parte general conserva valor.

Sub XXXX()
Dim MEN As String
Men="SS"
If MEN = Data6.Recordset.Fields("nrofacturas") Then
Data6.RecordSource = "SELECT * FROM consulta1 where nrofacturas = " & MEN & ""
end sub

Siempre va a valer "SS" la variable, pero si la pongo en la parte general puedo cambiarla.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:set MEN

Publicado por sace (41 intervenciones) el 13/04/2010 19:52:48
Ok no entiendo del todo.

If MEN = Data6.Recordset.Fields("nrofacturas") Then
Data6.RecordSource = "SELECT * FROM consulta1 where nrofacturas = " & MEN & ""

ahi me sale un msgbox y yo meto un codigo ejm:10 quedaria:
Data6.RecordSource = "SELECT * FROM consulta1 where nrofacturas = 10
y todo bien, pero la segunda vez coloco otro codigo y no me lo agarra, solo si vuelvo a colocar el codigo 10.

lo que quiero es set la variable MEN para que se cambie de valor.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:set MEN

Publicado por Pedro Luis (128 intervenciones) el 14/04/2010 10:11:27
Será porque solo en el caso de que men sea=10 se cumple
If MEN = Data6.Recordset.Fields("nrofacturas").
Las comillas finales, ya que nrofacturas parece numérico, no se que pintan.
¿Como narices se mete un 10 en un Msgbox?
Pon mas código no se entiende nada.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar