Converter PHP para ASP

[AprendizPHP 0]

Olá pessoal,

 

Estou usando ASP, e tenho uma busca em PHP, se alguém conseguir, poderia converter o código?

 

if(isset($_GET['getClientId'])){
  $res = mysql_query("select * from ajax_client where clientID='".$_GET['getClientId']."'") or die(mysql_error());
  if($inf = mysql_fetch_array($res)){
    echo "formObj.firstname.value = '".$inf["firstname"]."';\n";    
    echo "formObj.lastname.value = '".$inf["lastname"]."';\n";    
    echo "formObj.address.value = '".$inf["address"]."';\n";    
    echo "formObj.zipCode.value = '".$inf["zipCode"]."';\n";    
    echo "formObj.city.value = '".$inf["city"]."';\n";    
    echo "formObj.country.value = '".$inf["country"]."';\n";    
    
  }else{
    echo "formObj.firstname.value = '';\n";    
    echo "formObj.lastname.value = '';\n";    
    echo "formObj.address.value = '';\n";    
    echo "formObj.zipCode.value = '';\n";    
    echo "formObj.city.value = '';\n";    
    echo "formObj.country.value = '';\n";      
  }    
}

[xanburzum 169]

o que este code , faz exatamente ???

 

e olha este link

[Vinicius Ianni 189]

Procura por paginação.

No laboratório de scripts tem alguns exemplos.

[hargon 64]

Pelo que entendi, o código serve para preencher um formulário com informações do banco de dados através de Javascript, correto?

 

Segue abaixo a versão ASP:

If (Not isEmpty(Request.QueryString("getClientId")) Then
  Dim res
  'O objeto CONEXAO tem que ser declarado antes de executar a linha abaixo
  res = conexao.Execute("select * from ajax_client where clientID='" & Request.QueryString("getClientId") & "'")
  If (Not res.Eof) Then
    Response.Write "formObj.firstname.value = '" & res("firstname") & "';" & vbCrLf 
    Response.Write "formObj.lastname.value = '" & res("lastname") & "';" & vbCrLf 
    Response.Write "formObj.address.value = '" & res("address") & "';" & vbCrLf
    Response.Write "formObj.zipCode.value = '" & res("zipCode") & "';" & vbCrLf;    
    Response.Write "formObj.city.value = '" & res("city") & "';" & vbCrLf   
    Response.Write "formObj.country.value = '" & res("country") & "';" & vbCrLf
    
  Else
    Response.Write "formObj.firstname.value = '';" & vbCrLf
    Response.Write "formObj.lastname.value = '';" & vbCrLf
    Response.Write "formObj.address.value = '';" & vbCrLf
    Response.Write "formObj.zipCode.value = '';" & vbCrLf
    Response.Write "formObj.city.value = '';" & vbCrLf
    Response.Write "formObj.country.value = '';" & vbCrLf
  End If
End If

[augustoclaro 2]

Isso resolve?

 

<%
id = request.QueryString("getClientId")
if not id = "" then
sql = "select * from ajax_client where clientID='"&id&"'" 'Aqui eu acho que tinha que ser sem as aspas siples.
set rs = conn.execute (sql)
if rs.eof then
%>
formObj.firstname.value = '';
formObj.lastname.value = '';
formObj.address.value = ''; 
formObj.zipCode.value = ''; 
formObj.city.value = ''; 
formObj.country.value = '';
<%
else
%>
formObj.firstname.value = '<%=rs("firstname")%>';
formObj.lastname.value = '<%=rs("lastname")%>';
formObj.address.value = '<%=rs("address")%>';
formObj.zipCode.value = '<%=rs("zipCode")%>'
formObj.city.value = '<%=rs("city")%>';
formObj.country.value = '<%=rs("country")%>';
<%
end if
%>

lembrando que vce vaai ter que criar a conexão, e para usar mysql no asp vce precisa de um driverr chamado MySql ODBC Connector.

 

ops eu e o hargon postamos juntos hehe

[xanburzum 169]

na verdade, você tendo a lógica do código, ou seja, como ele funciona (seu algoritimo), você consegue desenvolver na linguagem que quiser,...