Olá Msmarcus.

 

É que entre os dados que quero enviar existe um código de segurança que aparece aleatoriamente (letras e números) por isso quero passar os dados de três text.box via POST para o servidor, sendo que o usuário deve digiá-los. Realmente tem que ser via POST. 

Estou tentando utilizar  via INET assim:

Inet1.Execute "http://live.telme.sg/callmeback.php?", "POST", strdata, "Content-Type: application/x-www-form-urlencoded" conforme um exemplo aqui do fórum mas não está dando certo, pois não estou sabendo passar os campos necessários na URL.

 

Eu teria que passar três campos com nome: dcv, numb e security_code mas obrigatoriamente deve ser via POST.

 

Desde já gradeço a ajuda.

 

Daniel.

 

Olá Msmarcus:

Queria saber como que como eu jogo os dados dos três text.box (dcv, numb e security_code) na URL que será executada pelo INET?

 

Estou usando assim:

 

Os dados estariam no strData? Como faço?

 

Agradeço desde já a ajuda.

 

Daniel.

 

Olá e desculpa pegar carona no seu post drskaka,

 

Bom, lendo o seu post acredito vi que estou na mesma situação, tenho  um cadstro com os campos CNPJ, CPF e CODIGO  gostaria de passar pra esta pá  o site https://www8.receita.fazenda.gov.br/SimplesNacional/controleacesso/autentica.aspx?id=5 mais como fazer eis a questao hehehe?

Faça o seguinte:

Crie um novo projeto em VB,
Adicione o Controle INET

Crie 3 Textboxes e 1 CommandButton

' Text1 = Usuário
' Text2 = Senha
' Text3 = Email

Private Sub Form_Load()
Text1.Text = "Digite seu Nome"
Text2.Text = "Digite uma senha qualquer"
Text3.Text = "Digite seu e-mail"
End Sub

Private Sub Command1_Click()
Inet1.OpenURL "http://www.marcus-vinicius.com/php/index.php?usuario=" & Text1.Text & "&senha=" & Text2.Text & "&email=" & Text3.Text
End Sub

Explicações:

Em minha página eu criei um arquivo INDEX.php com o seguinte código:

<?php
  if(isset($_GET['usuario']) && isset($_GET['senha']) &&

isset($_GET['email']) ) {
    $usuario = $_GET['usuario'];
    $senha = $_GET['senha'];
    $email = $_GET['email'];
    $mensagem = "Usuario: $usuario/r/nSenha: $senha";
    mail($email, 'Subtitulo aqui', $mensagem);
  }
?> 

Lembre que em VERMELHO as BARRAS estão invertidas porque o VBWEB não aceita barras em VERTICAL, quando você colar o código no NOTEPAD lembre-se de coloca-las em VERTICAL.

RESUMINDO:
Este exemplo que montei para você, demonstra como que funciona o método em que as variáveis recebem o VALOR das TEXTBOXES e assim ENVIAM um E-MAIL para o E-MAIL que você específicou com os dados que você inseriu no TEXT1 e TEXT2

Não sei qual E-mail você irá colocar para receber a mensagem, mas após você clicar no CommandButton aguarde 5 segundos e dê uma olhada em seu e-mail,
Se por acaso não tiver nada na caixa de entrada vá na parte de Lixo Eletrônico que deve estar lá.

*Eu tenho preferência de usar e-mail do GMAIL pois é mais compatível.

Abraço.

Olá Msmarcus.
Fiz como você falou, ele envia os dados mas não funciona. Na realidade é um sistema de discagem pela internet que utiliza o método POST para enviar os dados. Quando envio o telefone deveria tocar mas não toca. Eu acho que não pode ser enviado da maneira que falou pois o servidor não aceita, deveria ser via POST mesmo, somente assim. Por isso que precisaria de um jeito de enviar via POST.
Aqui no site tem uma dica sobre POST em VB na página http://www.vbweb.com.br/dicas_visual.asp?Codigo=1459&Classificacao=  só que não sei como passar os três campos para a STRDATA que acredito que sejam os dados agrupados, etc.

Agradeço desde já a atenção.

Obrigado,

 

Daniel. 

Olá,

Na realidade o código que te enviei é também um método POST só que não é propriamente dito.

No caso do STRDATA, é a mesma coisa que fiz, só que você fará assim,
Vamos supor que o site de origem seja de LOGIN, e nele há as variáveis USER e PASS

Re-aproveitando o TUTORIAL do AMIGO DARLAN...

strData = "?user=" & TXTusuario.text & "&pass=" & TXTsenha.text
Inet1.Execute "http://localhost/livro/testalogin.asp", "POST",strData, "Content-Type: application/x-www-form-urlencoded"

Abraço.