Temas

El problema que tengo es asi.

En una lista ya  tengo cargados datos (40 datos cargados en la lista por ejemplo, siempre en el mismo orden)

Y tengo 6 labels.

Lo que necesito es que al apretar un botón  me cargue en esos 6 labels los primeros 6 items de la lista y deje de recorrer la lista. Luego al apretar de nuevo, saque la info de los 6 labels y ponga lo que está en la lista del 7mo al 12 (o sea los otros 6), y así hasta terminar la lista. Cuando termina la lista, empieza de nuevo. Si encuentra algo en blanco pone un 0 en el label

En fin, que la recorra de 6, pare. Muestre. Muetre de 6. Pare, Muestre y así. cada vez que para es por que llegó a 6. Y cuando continúa es por que se le dio click de nuevo al botón.

Gracias.

Jamas di con un problema tan extraño, trataré de resumir. El problema es con un bat

Estoy haciendo un programa que simplemente con un commonddialog selecciono un archivo, el path y la extension queda en un txt, y con un boton se ejecuta lo que haya quedado en el path, o sea seleccono un archivo y lo ejecuto... solo eso.

Que sucede, cuando lo selecciono por primera vez y le doy ejecuitar a ese boton lo abre correctamente.

Luego el sistema mio tiene la opcion de guardar registros de todo eso, asi que mediante los record set guardo en la base de datos cada registro, luego cuando el usuario quiere restarua eso (a modo de preset)

Resulta que carga todo correctamente, cuando lo devulevo el path del programa al mismo txt original, en el textbox se puede apreciar que se lee exactamente IDENTICO a como fuera si el usuario lo hubiera seleccionado recien en lugar de restaurar la preset.

Ahora que pasa... cuando le doy ejecutar, no se ejecuta...

pero si selecciono de nuevo el archivo y una vez vuelto a seleccionar  (obviamente la ruta no cambia ni se modifica a la vista, es exactamente la misma) si anda el ejecutador de mi programa... con solo volver a seleccionar lo mismo

El tema es que lo que selecciono es un bat, entonces en realidad el shell si lo ejecuta, pero se cierra rapidamente, como si fallara algo interno del bat, pero lo tan extraño que destaco, es que simplemente volviendo a cargar manualmente (con mi boton examinar) el archiv bat, si anda. Y la ruta no se modifica.

Es mas, en la linea anterior a ejecutar el shellejecute, puse un msgbox para que muestre al path del programa, y en ambos casos (cuando restauro el preset desde la base de datos, o seleccionado ahi mismo sin usar el recorset) el path es exactamente el mismo y no hay una / de menos o de mas o : o esas cosas..

que podrá ser?

Básicamente, mi programa tiene que ejecutar programas, pero como sabemos eso de "ejecutarlo y listo" murió con Windows XP. Desde Vista en adelante está el UAC y toda esa basura. Que no es problema, si el usuario tiene que confirmar abrir el .exe que yo mando la orden con el Shell de VB6 no es drama, el drama es que si el .exe no tiene tildado el "Ejecutar como administrador" el programa o no abre, o abre y no hace lo que tiene que hacer. La pregunta es, como hago para que el Shell ejecute programas como adminsitrador?

Ya probe todo lo que dice en internet, registre cuanta OCX exista, y no anda. Ya probe en 2 PCS; (ambas W7 x64) Y no logro hacerlo caminar.

Tenia un sistema de facturacion que habia creado apra uso interno de mis gastos, con muchos listview (de ahi viene el problema). Un dia restauré una copia de seguridad de toda mi pc a 3 meses antes (no uso el de windows, uso Acronis). Y bueno, restarué la copia y dejó de andar ese programa, me tira cuanto error maldito exista al abrir el proyecto. Ya hace 2 meses q decisití y hoy se me ocurrio probarlo en otra PC, q no tira ningun error al levantar el proyecto, pero cuando le doy play me dice que "La declaracion de procedimientos no coincide con la descrpcion del evento" y bla bla bla y hace foco en esto  MSComctlLib que es un ListView

Private Sub ListView1_ItemClick(ByVal Item As MSComctlLib.ListItem)

Ahi. tira amarillo.

Ya no se que haces, me encantaria recuperar ese proyecto. Encima ni compilado lo tengo, noe staba al 100%, estaba al 95% casi algunas cositas minimas le faltaban x eso nunca lo compile, me faltaba poco para terminarlo y se me re cagó hace 2 meses y quiero recuperarlo.

Que puedo hacer?

NOTA ADICIONAL: Instalé el AtubeCatcher, que modifica la DLL asociada a todo esto, el MSCOmCTL.ocX, pero ya lo desintalé, e incluso en la PC nueva ni estaba instalado y tambien chilla y no deja q arranque.

Estoy haciendo un proyecyto netamente basado en listviews, muchas consultas a base de datos, visualizaciones, incluso eh llegado al punto de reemplazar listbox por listview... en sintesis no puedo presindir de los ListView.

Tuve un problema con mi windows, no sé exactamente que pasó, pero la cuestión es que hice una copìa de seguridad de todo el sistema con el programa AOMEI Backupper. Hice esa backup, y volví el timpo atrás con otra imagen de mi misma PC de febrero de 2019 y me eonctré con estos problemas con el Visual. Decistí y volvi a montar la imagen de Junio, y para mi asombro el problema está.

NO anda el proyecto. Cuando lo abro me tira errores de archivos .log, No carga la OCX para q funcionen los Listview. (aun asi, acepta el componente, cuando puse la imagen de Febrero ni tomaba la OCX) ahora la toma. La cuestino esq ue tira error en la construccion del Listview, es como si estuviera bugeado el componente :S

que peudohacer??

Eso, En lo posible, me gusta y estoy conforme con el 4.4.2, pero el 4.4.2 en mi Galaxy S5, cada vez q uso el whastapp, los audios entran a parpadear la pantalla (enciende y apaga) y no se bloquea, aparte es muy desgradable ya que si lo acerco mucho al rostro, se activan funciones que nada que ver.

Es el sistema. Lo es. acá el otro hilo:

https://foro.elhacker.net/android/pantalla_parpadea_al_acercar_el_rostro_solo_whatsapp_lo_mas_raro_del_mundo-t487658.0.html

Lo es, por que puse el 6.0 y no lo hace. Anda bien el whastapp con el 6.0

Pero el 6.0, tanto como el 5.0 no tienen el control de volumen en la pantalla de bloqueo cuando areptas el power unos segundos...

Existe alguna forma de bajar el volumen dede la pantalla de bloqueo? desde mi S3 Mini q tuve en el 2014 que mantenia el power y asi ponia en vibrador o silencio totoal.. y aca no puedo.

Eso seria, lo de poner en silencio o vibrador o con todo volumen en la pantalla de bloqueo.

salu2

(NOTA: Oficialmente el S5 es compatible conla 4.4.2 5.0 y 6.0) Son las rom originaels de samsgun-firrmware, no son custm

[Bueno, compré uno... Y el problema, es que al acercar mi rostro al celular, cuando reproduzco un Audio de Whatsapp, la pantalla en lugar de apagarse (bloquearse, idea prinicpal) entra en un estado de "epilepsia" la luz de la pantalla, se prende y apaga, parpadea. De todas formas, el audio sale correctamente en volumen bajo x el alavoz pequeño y no el grande, cosa de que yo sólo lo escuche.Bueno, no es agradable tener la pantalla parpadeando al lado de tu cara, y además no se bloquea, por lo que si lo muevo o algo, se activa cualquier cosa.Se probó el sensor de proximidad, tanto como el apartado de configuracion oculto al usuario por combinacion de numeros, como en aplicaciones normales, como la llamada comun. Y funciona sin problemas,]

Hola, le puse ese agregado "lo mas raro del mundo" por que les garantizo, que lo es!!

La historia es así, yo tenía un S3 mini, el cual murió. Bueno, me migré a un S3 comun, y acá empezó todo...


lo compré por "outlet" digamos, fallados (con falla mínima -estética-, no funcional) A un bajo precio.

Bueno, compré uno... Y el problema, es que al acercar mi rostro al celular, cuando reproduzco un Audio de Whatsapp, la pantalla en lugar de apagarse (bloquearse, idea prinicpal) entra en un estado de "epilepsia" la luz de la pantalla, se prende y apaga, parpadea. De todas formas, el audio sale correctamente en volumen bajo x el alavoz pequeño y no el grande, cosa de que yo sólo lo escuche.

Bueno, no es agradable tener la pantalla parpadeando al lado de tu cara, y además no se bloquea, por lo que si lo muevo o algo, se activa cualquier cosa.

Se probó el sensor de proximidad, tanto como el apartado de configuracion oculto al usuario por combinacion de numeros, como en aplicaciones normales, como la llamada comun. Y funciona sin problemas,



Bueno, en fin, ese es el problema. PEro acá viene lo "más raro del mundo!"

Me lo cambiaron, me dieron otro en la garantia, otro S3. EL mismo problema, lo mismo!

me pudrí, decistí y me lo quedé.

En un arranque de furia, lo di contra el piso, y explotó y murió. Nunca mas S3.

Luego di con un Core 2, pero no cuenta x q fue tan pedorro que ni sensor de proximidad tenia, siempre salia x el alavoz principal, ni cuenta es solo un comentario.


Finalmente, hoy luego de 3 meses de reventar el S3, me compré un S5. Y adivinen que??? De nuevo el problema!!!!!

Este S5, no es nuevo, lo compré en un local de celulares, el vendedor me dijo que entró con la placa muerta, y la dueña se lo regaló y él le cambió la placa y quedo nuevo y  lo estaba vendiendo (regalado x cierto).

Bueno, que hago???? Otra vez esto!!!! Ya es la maldición de whasapp que me pasa!!!


Notas generales:


-Siempre bajo la última version de Whatsapp de la APP de google
-No probé otro sistema,  siempre Roms originales de Sammobile (en el S3 era la 4.3 y en este que tengo ahora la 4.4.2. Podría problar la 5.0 (la odio) y la 6.0, para descartar que sea el SO. Pero por qué un SO tendria ese problema...
-En el S3, probé la version exclusiva de claro q me vendieron en el lugar, y no. Luego baje un ARO y tampoco. AHora en el S5 tengo un el ARO de esta version de S5 (Soy Claro, Argentina)
-Probé otra cuenta de google, sin restaurar mi back up de WSP.. y tampoco

Sólo me queda cambiar de número... pero que tendrá que ver eso???


Lo extraño, es que no es problema del celular, por que con otras cosas andan bien. ADemas... 3 celulares?!?!? con el S3 mini nunca un problema.


Ojala me puedan ayudar. saludos!

Hola. Tengo un problema bastante extraño. (Al final citaré todo mi hardware).

Durante el aranque del Bios, el logo del mother se muestra correctamente. Luego las letras en blanco con fondo negro, también lo hacen correctamente. Pero en el momento de que debería aparecer el logo de "Iniciando Windows" Se pierde la frecuencia de hz (o fuera de resolución) Del monitor. Pero cuando arranca la pantalla de Bienvenida de Windows, la resoluciòn se recupera y anda con normalidad. El prolema, es que al tener esta falla, no puedo ejecutar ninguna aplicaciòn en modo DOS, (desde el menu de F8, hasta algun booteo. Si bien tengo un pendrive multiboot y puedo ver mis aplicaciones, una vez iniciadas la frecuencia se pierde, y no sè si està cargando o si se colgó o que. Que puedo hacer para solucionar esto? Paso a dejar los detalles tecnicos mas relevantes del hardware:


Mother: GA-EP45-UDL3
Bios: Actualizado a la ultima version (v9)
Monitor: Samsung SyncMaster 740nw
Placa de video: Radeon R9 270

Notas adicionales: Cuando tuve la posibilidad de usar otro monitor, recuerdo que si podía ver el arranque, aunque de todas formas era el arranque tipo windows vista (barrita de carga amarilla) Y no el de Windows 7 (que es el sistema que tengo). Tambièn recuerdo que habrè hecho unas modificaciones en el BIOS, he pasado de la V6 a V3 y V9 de nuevo un par de veces.

Serà problema de configuracion del monitor o alguna configuracion en el BIOS? Aun no le he quitado la pila al Mother pero le di un restore de fabrica y sigue igual. Se puede poner algun controlador o software para contorlar el comportamiento del monitor?

Y otra cosa, El monitor lo tengo contectado a la R9 en el segundo slot (tiene un DVI 24+5 y un DVI 24+1) Logicamente con el Conversor DVI-VGA de 24+1. Otra cosa que me extraña es que deberia andar bien en el 24+5 con el adaptador comun pero no anda de esa forma. Y por un tema de espacio me vi obligado a ponerlo en el 24+1 con el conversor de señal.

Esto es todo lo que puedo aportar. Espero me puedan ayudar. Gracias.

Tengo un problema. EN el codigo q les dejo abajo, lo que hace correctamente es ocultar/mostrar lo que esté entre el <div> por medio de dos botoncitos. Lo hace bien sin drama. Lo que me gustaria es que ese estado (mostrado u ocultado) perdure en la página cuando voy a otro hypervinculo de la pagina.

O sea que quede recordado si el usuario esta mostrando o ocultando esa sección. Seguramente sea metiendo un IF por algun lado pero no sé como hacerlo.

Agradecira que me ayudaranb, gracias!

Código [Seleccionar] Expandir


<script languague="javascript">
        function mostrarCate() {
            div = document.getElementById('flotanteCate');
            div.style.display = '';
        }

        function cerrarCate() {
            div = document.getElementById('flotanteCate');
            div.style.display = 'none';
        }
</script>

<input type="button" value="Mostrar Categorias" onclick="mostrarCate()" />
<input type="button" value="Ocultar Categorias" onclick="cerrarCate()" />


<div id="flotanteCate" style="display:none;">



Todo Esto se oculta/Muestra




</div>



Tengo varios formularios, como 10 o 15, y muchas consultas a la base de datos de access, q la mayoria terminan en txtbox, traidos y con vista previa en listview y listas. El problema es que algunas veces, cuando cargo un dato (por ejmplo alta o modifacion de clientes) Cuando me desplazo a otro formulario que usa esos datos que cargué en el primer formulario.. me trae cualquier cosa, o mejor dicho me lo trae con todo vacio o incluso tengo un boton verde grande q ni el color agarra... tengo q volver a atras, volver a ingresar al formulario y ahi carga bien.

Como podria arreglar esto?

Tengo este codigo, que me vale bien para buscar por columna, y seleccionar la coincidencia:

Código [Seleccionar] Expandir

Private Sub cmdBuscar_Click()
  Dim Opcion As Integer
  Dim dato As String
  Dim Item As ListItem
 
  ' busca por las demás columnas ( por SubItem )
  If Option1.Value = True Then
     dato = txtSearch.Text
     Opcion = lvwSubItem ' busca por los subitems
  End If

  Next i
        ' Busca por la primer columna ( por item )
  If Option2.Value = True Then
     dato = txtSearch.Text
     Opcion = lvwText ' busca por el item
  End If
     
   ' si lo ingresado es una cadena vacia sale
   If dato = vbNullString Then
       Exit Sub
   End If
 
  ' Busca con el método FindItem, estableciendo la opcion de búsqueda
  Set Item = ListView1.FindItem(dato, Opcion, , lvwPartial)
   
  ' si el item es nothing no se encontró
  If Item Is Nothing Then
     MsgBox " No se encontró el dato", vbInformation
     Exit Sub
  Else
      ' .. si no , selecciona el elemento encontrado
      Item.EnsureVisible
      Item.Selected = True
      ListView1.SetFocus
  End If

              End Sub

le faltaría agregarle un ciclo para que continue con la palabra siguiente al volver a aprtar el boton. Alguna idea?

Tengo este codigo robado de por ahí...  que hace lo que quiero casi a la perfeccion.

LO que hace, a medida q voy escribiendo me va  encontrando las coincidencias en eel list box, en el orden q sea, cuantas entradas sean, sin importar orden ni mayusculas ni minusculas (es realmente muy bueno) Pero tiene un detalle que me gustaria solucionar.

Me gustaria q cada vez q aprieto el enter, o sea el la key13 del evento keypress del textbox, la seleccion se desplaze hacia la siguiente coincidencia, que no se quede siempre en la misma. Que tendria que agregarla al codigo? Saludos!!

Código [Seleccionar] Expandir

Function ListIsIn(lst As ListBox, zString As String) As Boolean
    On Error Resume Next
   
    For i = 0 To lst.ListCount
        If InStr(UCase$(lst.List(i)), UCase$(zString)) Then ListIsIn = True: lst.ListIndex = i: GoTo grr
        i = i + 1
    Next i
    ListIsIn = False
grr:
End Function

Private Sub Command1_Click()
    Me.Caption = ListIsIn(List1, Text1.Text)
End Sub

Private Sub Form_Load()
    List1.AddItem "MÉXICO" & " Pepe "
    List1.AddItem "VENEZUELA" & "Jose"
    List1.AddItem "ARGENTINA"
    List1.AddItem "ESPAÑA"
    List1.AddItem "GUATEMALA"
    List1.AddItem "ARGENTINA"
    List1.AddItem "CHILE"
End Sub

Private Sub Text1_Change()
   Label1.Caption = ListIsIn(List1, Text1.Text)
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)


If KeyAscii = 13 Then

End If

End Sub




de Yapa pregutno, q modificacion le hago para hacer esto mismo en un listvew?

Este codigo me vale para sumar numeros decimales y enteros en un listbox, y luego mostrar la suma en un texbox.

Dim i
Dim total
total = 0
For i = 0 To List11.ListCount - 1
total = total + CDbl(List11.List(i))
Next i
txtPrecioTotal.Text = total
End Sub

El problema es que esos numeros estan mezclados con letras (primero antes que nada va el numero) Por lo que si le pongo VAL, me suma aunque tenga letras, pero no me suma los decimales. Y si le pongo CDBL, no anda. Si le saco las letras y le dejo el CBDL, si me suma y con decimales.

Lo que necesito es que me sume enteros, y decimales, incluso haya palabras mezcladas luego de los primeros caracteres que vendrian a ser los numeros a sumar

Este codigo me suma sin problemas todas las entradas del listview depediendo lo que le ponga en SubItems(X)

con 1 me suma el valor 2 de la lista (ya que es 0, 1, 2) Pero si justamente quiero q me sume el primer valor de la lista, q es el 0, el subitem deberia ser 0. Pero me dice error. Y si le dejo el 1, me suma el 2do campo de la lista, q es correto ya que es 0, 1.

Alguna idea como puedo arreglar esto?

   Dim i As Long
   'Recorre todos los items y para sumar los SubItems
   For i = 1 To ListView1.ListItems.Count
       sumar = sumar + CDbl(ListView1.ListItems(i).SubItems(1))
   Next i
       txtDia0 = sumar

RESUMEN: neceisto q me sume cada valor de esas columinas en los txts negros de
abajo...

Necesitaria saber como sumar una columna en específico de clientes en especifico con visual 6.0.

La idea es esta:

Cada vez que le "anoto" a un cliente una venta que no paga (que saca fiado) en la base de datos se anota un 1. Entonces, cuando ese cliente me vuelve a pedir fiado y lo fio de nuevo, me agrega otro registro con el mismo codigo de cliente, y otro 1.

Entonces en la base de datos, tengo el codigo de cliente (repetido tantas veces lo fie) Sus datos de esa venta fiada, y un número 1 por cada vez que lo fie.

la idea es, traer a un textbox la suma de esos "1" que corresponden al cliente "4" por ejemplo.


Por ejemplo:

Pepito es el cliente 4
Jose es el cliente 5

A Pepito lo fié 1 vez (+1 a la cuenta de fiado)
A Jose lo fie 1 vez (+1)
A pepito lo volvi a fiar (+1)

Entonces, quiero que en el textbox me diga que a Pepito en total lo fie 2 veces (que me sume los 2 números 1 que tengo en el registro correspondiente a Pepito.)

El campo donde almaceno la cantidad de fiados es (donde va el 1), es
CantFiado

El cambo donde almaceno el código de cada cliente, es
CodigoCliente

y al tabla se llama Fiar.

Tengo entendido q se hace con uan sentencia sql de sum, pero no sé usarla.

gracias, espero me puedan ayudar


Asi lo tengo codificado:

Primero el form load carga esto, carga los datos de la base de datos a una lista, me trae unos ciertos datos de la base de datos no todos los registros

Código [Seleccionar] Expandir

Dim rs As adodb.Recordset
Dim sql As String
sql = "Select * from Fiar order by Apellido"
If Not Conectar() Then Exit Sub
Set rs = cn.Execute(sql)
List4.Clear
Do While Not rs.EOF
List4.AddItem Format(rs!FiadoNumero, "000") & vbTab & rs!Apellido & ", " & vbTab & rs!Nombre
rs.MoveNext
Loop
Set rs = Nothing
''Call cargardatosventas
''Call ordenar
Desconectar
'List1.ListIndex = 0


Despues, cuando hago click en algun elemento de la lista, me trae cada campo de la base de datos en un txtbox diferente:

Código [Seleccionar] Expandir


Private Sub cargafiado()

Dim opc As String
Dim cod As Integer
Dim sql As String
opc = List4.List(List4.ListIndex)
cod = Val(Left(opc, 3))
sql = "Select * from Fiar where FiadoNumero = " & cod
Dim rs As adodb.Recordset
If Not Conectar() Then Exit Sub
Set rs = cn.Execute(sql)
'' un registro para cada textbox como este:
txtccodigo = IIf(IsNull(rs!CodigoCliente), "(vacío)", rs!CodigoCliente)
Set rs = Nothing
Desconectar
end sub



La idea seria en una sub nueva o a continuación de "Cargafiado" haga lo que pido arriba, gracias

una aplicacion me me cambió la panalla de inicio de windows 7 x la de windows Vista. Ya probe todo para sacarla y  poner la de w7 de nuevo, con este link:

https://support.microsoft.com/es-es/help/2445937

Tambien con sysprep, formatendo incluso, y no hay forma, no puedo volver a la pantalla de inciio de windows 7 alguna idea?

Mother gigabyte ga ep45 ud3l

con el @BIOS de gigabyte le cambie el BIOS, se me hace q algunas de esas 2 opciones esta probocando q no aparezca la pantalla de windows, cual será?

[Resumen: Tengo 4 texbox y 1 cmdboton. un txtbox de costo, otro de ganancia, otro de porcentaje, y otro de ganancia discriminada. y el cmdbotn hace el cálculo.Cuando el numero el grande (y decimal) No hay problema. Pero cuando el numero es pequeño (0,xx) El cálculo no lo hace, tengo q ponerle el puto tradicional en vez de la coma decimal. Pero esto no sirve para la base de datos ya que me guarda cualquier cosa.Que puedo hacer?]

Pido perdon si consideran mis topics como spam, pero en realidad son dudas que tengo q ya vengo aquí luego de recontra googlear la solución y no encontrarla. Y agradezco mucho la ayuda, hasta ahora he podido resolver mis problemas gracias a las respuestas.


Resumen: Tengo 4 texbox y 1 cmdboton. un txtbox de costo, otro de ganancia, otro de porcentaje, y otro de ganancia discriminada. y el cmdbotn hace el cálculo.

Cuando el numero el grande (y decimal) No hay problema. Pero cuando el numero es pequeño (0,xx) El cálculo no lo hace, tengo q ponerle el puto tradicional en vez de la coma decimal. Pero esto no sirve para la base de datos ya que me guarda cualquier cosa.
Que puedo hacer?



El problema que tengo ahora, es que tengo un problema con la validación de la Coma y el Punto.

Utilizo este codigo para directamente reemplazar el punto del numepad por la coma de decimales, asi poder cargar registros decimales en una base de datos sin problemas y rápido.

En el evento  keypress del textbox, pongo esto

Código [Seleccionar] Expandir


If KeyAscii = 46 Then
KeyAscii = 44


Anda bien, con numeros grandes, como pueden ver en la siguiente foto. En costo añado un numero, en % un porcentaje, con el botoncito amarillo hago la cuenta en el último textbox suma el porcentaje al costo. Adicionalmente en un txt aparte muestra la cantidad del porcentaje discriminada.



Y todo maravilloso, hasta que me topé con un problema que me tiene de la cabeza. Resulta que si ingreso un numero pequeño (algo menor a 1) No realiza correctamente la suma y adhición de porcentaje. Directamente no lo hace, como la siguiente foto:



Luego le modifique el codigo en algunas cosas, pero el gran cambio que hice fue reemplazar la coma por el punto tradicional, al hacer so, si hace el cálculo correctamente, sean pequeñas o grandes cantidades.



El problema, es que el punto para la base de datos es basura y añadie cualquier numero incorrecto, tiene q ser la coma si o si para que que se guarde correctamente el numero en la bd. Que solucion puedo tener?

Pensé en que al hacer click en el boton amarillo me copie el contenido del txtbox con punto a uno nuevo con el mismo valor pero con la coma, y q el programa guarde ese casillero en la base de datos., pero no sé como hacer eso?

U otra solución seria darle un correcto funcionamiento al casillero con la coma y numeros pequeños, peo tampoco sé hacerlo.


Espero puedan ayudarme, gracias!

MOD: Imagenes adaptadas a lo permitido.

Eso, tan simple como eso, No entiende la sentencia IF, no anda! ya probe con varias combinaciones y no anda, que puedo hacer?

La idea es la siguiente, yo tengo un stock y un punto de reposicion

Por ejemplo,

Stock 50
Punto de reposición 20

Si yo tengo más de 20, deberia decirme "Stock normal"
si tengo menos de 20, "Faltante de stock"
y si tengo 0 "Sin Stock"

bueno la cosa, es que el IF que hice es este:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
If Text1.Text = 0 Then
MsgBox "Stock 0 !!!!!"
Else
If Text1.Text > Text2.Text Then
MsgBox "Stock mayor"
Exit Sub
Else
MsgBox "Stock menor"
Exit Sub
End If
End If
End Sub


Pero que rayos, el if no anda! si por ejemplo

en el txt de stock pongo 2
y en el txt de reposicion pongo 10, deberia decirme "Stock menor" ya que hay pocas unidades, hay menos unidades de las que deberia tener para avisarme (10)

Y deberia ponerme "Stock menor", Pero no! me pone stock mayor! y encima eso pasa asi le ponga cualquier numero, mayor o menor a 10, siempre sale por el lado del mayor, WTF?

Seguramente tengo algunos errrores menores en el codigo, pero por que sale por el positivo cuando es negativo?

Es visual basic 6.0 (tenia un proyecto del 2007 y ho 11 años despues quise retomarlo)

Bueno resulta que tengo este codigo:

Código [Seleccionar] Expandir

   Dim rs As ADODB.Recordset
       If Not Conectar() Then Exit Sub
       Set rs = New ADODB.Recordset
           rs.Open ("Elementos"), cn, adOpenKeyset, adLockOptimistic
           On Error Resume Next
           rs!Categoria = txtcate
           rs.Delete
           rs.Close
           rs.update
           Set rs = Nothing
           Desconectar

Elimina el registro de la base de datos, pero no el seleccionado. El registro está en el txtcate. Ahi está escrito el valor que quiero borrar de la base de datos (obviamente es un txt no modificable y son identicos). Lo que quiero es que me borre de la base de datos, el valor de ese txt.

Lo que pasa es que me borra el primer registro de la base de datos y no el que esta escrito en el txt. Comopuedo hacer para que me borre el registro seleccionado en el txt?

Ah, es la única columina de la tabla en el access, es solo 1 columna
gracias

Me aparecem sólamente 30 (medido en KB) 30, deberian ser 30.000

Por ejemplo el google chrime deberia consumir 123.000 KB y me pone solo 123.

Que es???

Podrian recomendarme un buen activador para windows 10? Ya baque uno que era una mentira y me entro el virus de comillas dobles, y despues baje uno q andubo una semana y se rompió y me dice q es trucho. Cual recomiendan?

gracias