Mensajes

  lo probe y no funciona igualmente lo unico que hace este programa es llamar a una pagina web y cargarle los datos  estas pagina por lo general no funcionan ya que los mensajes ninca llegan si saben de algun codigo mas completo u otra manera de enviar sms les agradecere la ayuda

saludos

Muchas gracias lo pruebo y te digo como me fue
saludos

Hola ssccaann43  gracias por responder.... estas seguro que es el link correcto por
que fui a la pagina y busque pero de envio de sms no encontre nada
gracias
saludos

Alguna sugerensia    (que no sea google jajaja)para este problema 

saludos
gracias

Hola a todos tengo que hacer un programa que envie un mensaje de texto desde mi aplicacion vb 6 a un celular Claro / Personal / Movistar  de Argentina y la verdad no tengo idea de como hacerlo ni que utilisar ???

me pueden ayudar   alguien hizo algo asi  
Muchas Gracias
Saludos

Ok gracias por eso el overflow
luego te cuento como me salio

gracias
saludos

Una mas ... esto de los numeros se me esta complicando   ... como paso a hexa este numero 3502289056  
probe

Código [Seleccionar] Expandir


dim a as double
dim b as string
a = 3502289056# ' el # me lo pone VB y no lo puedo borrar
b = Hex(a)

esto me da desbordamiento
yo quiero obtener D0C0B0A0

gracias
saludos

Funciono perfecto muchas gracias Karcrack   
me podes aclarar como funciona el "&H"  a = CByte("&H" & Right(cantHexa, 2))
por que yo habia probado cantHexa = &HcantHexa pero no me funciono

muchas gracias
un saludo 

Hola a todos tengo el siguiente problema... tengo que guardar datos en un archivo .bin  (ej : pepe.bin)  en donde cada dato que voy a guardar tiene un nombre, tipo y ocupa cierta cantidad de bytes dentro del archivo ej :
nombre:    tamaño:   tipo de datos:
cantidad   2 bytes    binario LSB-MSB

el problema que me surge es que al leer la cantidad de la BD (tipo de dato integer) lo debo pasar a hexa  luego swapearlo  y guardar esos valores ocupando solo 2 bytes
Pd:  para abrir el archivo y ver como se guardaron los datos guardados uso el UEStudio (UltraEdit)
ej

Código [Seleccionar] Expandir


Private Sub Form_Load()
Dim cantidad As Integer
Dim cantHexa  As String
Dim a As String
Dim b As String

cantidad = 6871             'lo paso a hexa
cantHexa = Hex(6871)  'y da "1AD7" que es un dato de tipo string

'ahora debo guardarlo swapeado y solo ocupando 2 bytes
a = Right(cantHexa, 2)  'D7
b = Left(cantHexa, 2)  '1A

Open "D:\pepe.bin" For Binary As #1
Put #1, 1, a 'D7
Put #1, 2, b '1A
Close #1
End Sub


El problema   que tengo es que este codigo me guarda 44 31 41 en tres bytes (valor hexa de D, el de 1 y el de A el 7 se pisa porque A1 me ocupa 2 bytes ) esto lo veo  usando el UEStudio conmutando a  modo hexa
Lo que yo deseo guardar es D7 (no 44 37) ocupando  un solo byte y 1A (no 31 41) ocupando un solo byte o sea que cuando uso el UeStudio  en modo hexa vea D7 y 1A ocupando solo 2 byte  
Bueno se hizo largo por que trate de ser lo mas claro posible
Espero que se entienda  
Un gran saludo

Hola ka0s sabes como hacer lo mismo que me respondiste pero usando un TDBGrid??
quiero que al seleccionar me pinte toda la fila y solo me deje eljir una (si presiona Ctrl que solo seleccione (pinte) una fila por ves)

gracias saludos