Replace

[Baby78]

Hola a todos, a ver si alguien me puede ayudar con esto

Estoy trayendo un campo de una base de datos llamemosle campox, el cual tiene diferentes valores:
MATERIALES (LUN/JUE/DIA)
MATERIALES (LUN/VIE/DIA)
MATERIALES (LUN/JUE/NOCHE)
MATERIALES (LUN/JUE/NOCHE)
MATERIALES (VIE/DOM/DIA)
MATERIALES (VIE/DOM/NOCHE)

lo que necesito es solo mostrar la palabra MATERIALES, mi pregunta es ¿como podria eliminar lo que esta dentro de los parentesis?, ¿tendria que hacer un replace para cada cosa que deseo eliminar?

Si alguien me pudiera decir como hacer esto por favor.

[sjam7]

y si pones:
texto=left("MATERIALES (LUN/JUE/DIA)",10)

text es MATERIALES

[Baby78]

perdon se me olvidaba MATERIALES es una de las tantos departamentos que existen tambien pueden ser SMT U1, R&R, SEGURIDAD, ETC. varian

[sjam7]

y todos son el mismo formato? es decir:
DEPARTAMENTO (DIAS) ???????

[Baby78]

Casi Todos, Hay Algunos Que Solo Traen El Nombre Del Departamento

[AlZuwaga]

podrías encontrar con InStr() en qué posición de la cadena aparece el primer paréntesis, y luego al campo le hacés un Left() hasta esa posición. Vamos, algo así:

dato = Left(Rs("campo"), InsStr(Rs("campo")))

[AlZuwaga]

Iniciado por Baby78

Casi Todos, Hay Algunos Que Solo Traen El Nombre Del Departamento

Ah, no había visto eso..
entonces primerame3nte debés verificar con un IF que InStr(Rs(Campo), "(") sea mayor que cero. Igual el código anterior está mal.
Sería así:

If InStr(Rs("Campo"),"(") > 0 Then
dato = Left(Rs("campo"), InStr(Rs("Campo"),"("))
Else
dato = Rs("Campo")
End if

(creo que ahora lo escribí bien)

EDITANDO: No estaba bien, pero ahora si (espero!)

[AlZuwaga]

Igualmente... ¿por qué no separás esos datos en dos campos?
Si se puede, porque la aplicación está en desarrollo y no hay ninguna otra que dependa de esa estructura, separalo en 2 campos que va a ser más práctico ¿no te parece?

[Baby78]

Igualmente... ¿por qué no separás esos datos en dos campos?

Igual y si, pero es algo que no lo puedo hacer, ya que la estructura de la base de datos ya no se puede modificar

El codigo que me mandaste funciona bien solo que me deja el primer parentesis

Es decir tengo esto en mi bd
EMPAQUE U2 (VIE/DOM/DIA)

y me muestra esto
EMPAQUE U2 (

Gracias

[AlZuwaga]

Bueno, pero a InStr(Rs("Campo"),"(") podés restarle la cantidad de cifras (1 o 2) necesarias para "eliminar" los caracteres necesarios.
Restale 1 así eliminás el paréntesis dejando el espacio, luego hacele un trim() para quitárselo (por las dudas que exista algún dato cargado como EMPAQUE U2( -sin el espacio enrtre el 2 y el paréntesis)

[Baby78]

ya quedo.

Gracias.

Si no es mucha molestia, quisiera saber si lo que le quite lo puedo almacenar en una variable ya que mas adelante voy a ocupar esa parte del campo.