Novatisimo queriendo hacer consulta

[seyacat]

Saludos a todos, quisiera que me ayude por favor. No tengo ni idea de ASP, y la verdad lo que quiero hacer no es dificil, en php lo hago con mucha frecuencia, lo que quiero es el scipt básico para

1 Recuperar las variables por post o get:

NI IDEA

2 Conectarse a una base de datos: que ya lo tengo..

varStriCone = "DSN=...;UID=...;PWD='';DATABASE=..;"
Set Session("conn") = Server.CreateObject("ADODB.Connection")
Session("conn").Open varStriCone

3 ahora un query que lo tengo asi:

strSql = "SELECT persona-nombres FROM pub.c103-personas"

4 y lo que me falta, es un foreach que me imprima las variables:

NI IDEA

Por favor ayuda.
Gracias

[Myakire]

1.
x = Request.Form("TuControl")
x = Request.QueryString("TuControl")
x= Request("TuControl") 'Esta forma recupera tanto por GET como por POST

2.
No tiene caso que hagas una variable de session con un objeto RecordSet, es mucho desperdicio de recursos

3.
No entendí

4.
Un foreach que imprima ¿qué variables?

[seyacat]

No tiene caso que hagas una variable de session con un objeto RecordSet

Soy novataso y no entinedo como seria

ahora El asunto es que una vez que realizo el query,

strSql = "SELECT persona-nombres FROM pub.c103-personas"

quiero imprimir los resultados de persona-nombres en una pagina web cualquiera, con salto de linea, <br> o lo que sea

[seyacat]

Quiero hacer esto, pero en ASP, eso en resumen

Código PHP:

  <?php

$conn = mysql_connect("localhost", "mysql_user", "mysql_password");

if (!$conn) {
   echo "Unable to connect to DB: " . mysql_error();
   exit;
}
 
if (!mysql_select_db("mydbname")) {
   echo "Unable to select mydbname: " . mysql_error();
   exit;
}

$sql = "SELECT id as userid, fullname, userstatus
       FROM  sometable
       WHERE  userstatus = 1";

$result = mysql_query($sql);

if (!$result) {
   echo "Could not successfully run query ($sql) from DB: " . mysql_error();
   exit;
}

if (mysql_num_rows($result) == 0) {
   echo "No rows found, nothing to print so am exiting";
   exit;
}

// While a row of data exists, put that row in $row as an associative array
// Note: If you're expecting just one row, no need to use a loop
// Note: If you put extract($row); inside the following loop, you'll
//      then create $userid, $fullname, and $userstatus
while ($row = mysql_fetch_assoc($result)) {
   echo $row["userid"];
   echo $row["fullname"];
   echo $row["userstatus"];
}

mysql_free_result($result);

?>   

[Myakire]

Esta fàcil, pero te juro que ya no doy por hoy. Mañana tempranito te paso el código "lo mas traducido posible" por que hay un par de cositas que se hacen diferente

See you

[seyacat]

Gracias :)

[Myakire]

Lo que quieres es esto:

Código:

<%

	Set Con = Server.CreateObject("adodb.connection") 
  sConn = "Driver= "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=myDatabase;USER=myUsername;PASSWORD=myPassword;OPTION=3;" 
  con.Open  sConn  

  vSQL=  "SELECT id as userid, fullname, userstatus " &_
         "FROM  sometable " &_
         "WHERE  userstatus = 1"
				 
	set adoRs = Server.CreateObject("adodb.recordset")
	adoRs.Open vSQL,Con
	
	if adoRs.EOF Then 
     Response.Write "No se regresaron datos"
		 Response.End
	End If
	
	While Not adoRs.Eof
	   Response.Write adoRs("userid") & " " 
	   Response.Write adoRs("fullname") & " " 
	   Response.Write adoRs("userstatus") & "<br>" 
	   adoRs.MoveNext
	Wend
	
	adoRs.Close
	set adoRs = nothing
	set con = nothing
%>

Ahora, hay algunas cuestiones que hay que revisar, por ejemplo si hay un error en php mandas el código del error. En ASP también se puede, para ello hay dos formas:

1) ado.Error
2) On Error

Saludos