bug en el vb6

[krackwar]

Hazlo o bien como dice Cobein o así:

Código (vb) [Seleccionar] Expandir


Dim Variable as string
Variable="Environ(" & chr(34) & "windir" & chr(34) & ")"


Aclaración:Chr(34)-->"

gracias por la respuesta , pero alguien pudiera aclarar por que no funciona?

[seba123neo]

yo sabia,o habia leido por ahi que para poner una string como string le tenian que poner doble de comillas asi te lo tomaba,algo asi como en las bases de datos,cuando hay un campo con comillas para que te lo tome le tenes que agregar 2 mas,o algo asi....

saludos

[~~]

A ver, es simplemente esto:

Código [Seleccionar] Expandir

Private Sub Form_Load()
Dim Cadena As String
Cadena = "Environ(""windir"")"
MsgBox Cadena
End Sub


De bug nada, es un error de sintaxis, y no sucede por el environ ni nada de eso, sucede en todas las cadenas con comillas dentro......

[Hans el Topo]

el tema esta en que las dobles comillas son un caracter especial

cadena= "Environ(" <- *

*al poner otra comilla ahí estas cerrando la cadena por lo tanto el "compilador" esta esperando un operador o sino dar por finalizada la instrucción

más claro agua

[cassiani]

Código (vb) [Seleccionar] Expandir

variable = "environ("windir")"

A ver, si hablamos de cadenas... de comilla a otra la tomara como una y ni hablar del windir que lo dejas fuera de la misma, por esa razón te sale concatenar...

¿Entendiste? 

[Zeroql]

USA el google o el MSDN

Devuelve la cadena (String) asociada a una variable del entorno del sistema operativo.

Sintaxis

Environ({envstring | number})

La sintaxis de la función Environ consta de los siguientesargumentos con nombre:

Parte Descripción
envstring Opcional.Expresión de cadena que contiene el nombre de una variable de entorno.
number Opcional.Expresión numérica correspondiente al orden numérico de la variable de entorno en la tabla de cadenas de entorno. Elargumento number puede ser cualquier expresión numérica, pero se redondeará a un número entero antes de ser evaluada.


Comentarios

Si no se encuentra envstring en la tabla de cadenas de entorno, la función devolverá una cadena de longitud cero. En caso contrario, la función Environ devolverá el texto asignado a la cadena envstring especificada; esto es, el texto que sigue al signo igual en la tabla de cadenas de entorno para dicha variable.

Si especifica number, se devolverá la cadena que ocupe esa posición numérica en la tabla de cadenas de entorno. En este caso, la función Environ devolverá todo el texto, incluida envstring. Si no hay ninguna cadena de entorno en la posición especificada, la función Environ devolverá una cadena de longitud cero ("").


Ejemplo de la función Environ
Este ejemplo utiliza la función Environ para proporcionar el número de entrada y la longitud de la instrucción PATH a partir de la tabla de cadenas del entorno.

Dim EntCadena, Indice, Msj, LongRuta   ' Declara variables.
Indice = 1   ' Inicializa índice a 1.
Do
   EntCadena = Environ(Indice)   ' Obtiene la
' variable de entorno.
   If Left(EntCadena, 5) = "PATH=" Then   ' Comprueba la entrada PATH.
      LongRuta = Len(Environ("PATH"))   ' Obtiene la longitud.
      Msj = "Entrada PATH = " & Indice & " y la longitud = " & LongRuta
      Exit Do
   Else
      Indc = Indice + 1   ' No es una entrada PATH,
   End If   ' buscar otra.
Loop Until EntCadena = ""
If LongRuta > 0 Then
   MsgBox Msj   ' Muestra el mensaje.
Else
   MsgBox "No existe variable de entorno PATH."
End If

[krackwar]

leiste por lo menos los post el problema era las comillas dentro de comillas
s4lu2!

[Ch3ck]

Eso tambien sucede con otras funciones como MsgBox o InputBox (creo).
y si es un problema de sintaxis y lo habian comentado en otro post.
Saludos!!!

[cassiani]

Código (vb) [Seleccionar] Expandir

variable = "environ("windir")"

Yo acá no veo comillas dentro de comillas, lo que veo es un error de sintaxis... y una de las soluciones es --> "Concatenación"