 
			
				06/03/2004, 11:33
			
			
			     |  
        |     |    |    Fecha de Ingreso: diciembre-2002  Ubicación: santiago-chilito  
						Mensajes: 1.931
					  Antigüedad: 22 años, 9 meses Puntos: 2     |        |  
  |      hola intente poner lo que me enviaste pero me marca error , mira yo lo asi:    
este es el codigo que envia datos  php   
vbasic:   
Dim oIE As Object, cCad As String, cPar1 
Set oIE = CreateObject("InternetExplorer.Application")   
'valores a enviar   
'user y clave a enviar 
user1 = fconfigurar.Text1(0).Text 
clave1 = fconfigurar.Text1(1).Text     
cPar1 = "Un_Valor" 
cCad = "http://localhost/prueba/prueba.php?user=" + user1 _ 
+ "&clave=" + clave1    
oIE.MenuBar = True 
oIE.TOOLBAR = True     
oIE.Visible = false 
oIE.Navigate2 (cCad)   
While (oIE.BUSY = True) 
   msgbox "enviando datos"    
Wend       
end Sub         
script php:esto recibe los datos que le manda vbasic por el navegador     
<?php   
//procede con el ingreso     
  $user=$_GET['user'];  //recibe esto que envia vbasic por la url 
  $clave=$_GET['clave'];     
  //validar que es usuario y clave esten correctas   
  $id=mysql_connect("xxx","xxx","xxx")or die ("clave fallo1"); 
  $conexion=mysql_select_db("xxx",$id) or die("no se pudo conectar"); 
  $db="xx";       
  $sql="select * from compra where user='".$user."' and clave='".$clave."'";     
  $res=mysql_db_query($db,$sql)or die ("no se pudo ejecutar"); 
  $num=mysql_num_rows($res);     
  IF  ($num==0) 
  {   
  echo "lo siento su clave no existe ";  //esto devuelve por el navegador    
                                               //esto es lo que quiero que vbasic reciba..   
  exit();   
  } 
  ELSE 
  { 
  ECHO "CLAVE ACEPTADA";   //esto devuelve por el navegador    
                                               //esto es lo que quiero que vbasic reciba..       
  }   
  en resumen vbasic manda user y clave por navegador a php , php responde si acepta o no , "acepta o no" es lo que quiero que vbasic entienda  y actue en consecuencia de la respuesta..     
muchas gracias,,           |