SoloCodigo

Gusto en saludarles amigos de SoloCodigo. En MySql yo puedo capturar el numero de un error de ejecución mediante la instrucción mysql_errno(); ¿cuál es su equivalente en postgres? Gracias de antemano por su apoyo.

Buenas amigos de solo código:
Estoy programando en PHP con My-sql, y necesito hacer una instrucción en My-sql en la cláusula WHERE de este tipo: WHERE LEFT$(Campo, 1, 3) = valor; he colocado en este ejemplo un modelo de instrucción de Sql en Visual Basic, la cual trabaja perfecto. Lo que quiero saber es como hago el equivalente en My-sql donde aparece el "LEFT", ya que necesito comparar una parte del campo de la tabla contra un valor.
       De antemano las gracias a usedes y saludos a todos.

Buenas amigos de Solo Codigo.
Estoy desarrollando un sistema en PHP y uso como base de datos My-Sql; tengo generada en Ms-Access una información que me gustaría migrarla a My-Sql, pero no se como hacerlo. ¿Pueden por favor darme apoyo en este campo?
Muchas gracias de antemano.

Y tengo otro problemita, en la instrucción mysql_fetch_array me da el siguiente mensaje de error:
Warning: mysql_fetch_array(): supplied argument is not a valid MySQL result resource in c:\AppServ\www\servicio-medico\privado\Informes\inf_relacionmensualdeconsultas.php on line 460

Buenas amigos de solo código.
Estoy haciendo un reporte en PDF y debo arrojar totales por varios niveles de control;
para esto uso varios ciclos Do-While anidados. Cómo es lógico hago una lectura de archivo al principio de todo el proceso para obtener el primer registro y otra en el Do-While más interno (la lectura en con mysql_fectch_array).
Por cada ciclo Do-While necesito verificar si me ha cambiado el correspondiente campo de control y por supuesto si hubo fin de archivo.
Yo intenté poner en cada While una condición múltiple pero aparentemente php no lo permite; mi pregunta es: ¿cómo puedo hacer para que por ejemplo si rompe un nivel de control pero no es fin de archivo que haga lo que yo quiero y vuelva a reiniciar el ciclo.
A continuación les pongo un modelo de lo que estoy diciendo:

if ($Registro = mysql_fetch_array($_SESSION['RegistroConsulta'])):
    $Eof = false;
else:
    $Eof = true;
endif;

Do
{   TotalDepartamento = 0;
     DeptoAnt = DeptoActual;

     Do
     {  TotalSeccion = 0;
         SeccionAnt = SeccionAct;

         Do
         {  Contador++;

             if ($Registro = mysql_fetch_array($_SESSION['RegistroConsulta'])):
                 $Eof = false;
             else:
                 $Eof = true;
             endif;

         }  while (SeccionActual == SeccionAnt ||
                      DeptoActual    == DeptoAnt   ||
                      $Eof               == true);

     }  while (DeptoActual == DeptoAnt ||
                  $Eof            == true)      
}   while  ($Eof  == false)

Mi duda específica es como emular el uso de condiciones múltiples en un while ya que aparentemente php no lo permite.
Espero haberme explicado bién y agradezco cualquier ayuda:

Te agradezco la sugerencia que me das, aunque ya la habia pensado. Solo por curiosidad ¿cómo puedo lograr lo que me había propuesto antes?
Disculpa tanta ignorancia.    Gracias de nuevo.

Hola amigos de solo código.

Estoy aprendiendo a programar en PHP y necesito saber lo siguiente:
Para yo tener el valor de un <INPUT TYPE> yo uso un código JAVA como éste:
           document.form.campo.valor
¿Cómo hago para obtener el valor que yo seleccioné en un combo (<SELECT> y <OPTION> )?
   He probado algo como ésto: document.form.NombreCombo.option.value pero obviamente no resulta. ¿Pueden ayudarme?
                Muchas gracias de antemano y disculpen la ignorancia

Buenas amigos de solocodigo.

En access-2000 tengo 1 tabla de PROGRAMAS y otra de SUBPROGRAMAS, los campos de la tabla de PROGRAMAS SON LOS SIGUIENTES(Codigo, NombrePrograma) y los de la 2da. tabla son (Codigo, CodProg, NombreSubprograma); en esta ùltima tabla CodProg contiene el Còdigo del programa al cual pertenece el Subprograma en cuestiòn.

Estoy tratando llenar un control DATA TREE que me muestre jeràrquicamente para cada programa los subprogramas respectivos.

A continuaciòn les expongo el còdigo VBA con el que pretendo hacer esto:

Private Sub Form_Load()

            Dim Cnn As ADODB.Connection, _

                RstProgramas As ADODB.Recordset, _

                RstSubProgramas As ADODB.Recordset, _

                NodX As Node, _

                StrCodPrograma As String

               

            Set Cnn = New ADODB.Connection

            Set RstProgramas = New ADODB.Recordset

            Set RstSubProgramas = New ADODB.Recordset

            Cnn.ConnectionString = "File Name=C:\Documents and Settings" _

                                             & "\mcastro.MARN" _

                                             & "\Escritorio" _

                                             & "\ConexionRac.udl"

            Cnn.Open

            RstProgramas.Source = "Tbl_Programas"

            RstProgramas.ActiveConnection = Cnn

            RstProgramas.Open

           

            TvwPrueba.Style = tvwTreelinesPlusMinusText

            TvwPrueba.LineStyle = tvwRootLines

           

            Do While Not RstProgramas.EOF

               Set NodX = TvwPrueba.Nodes.Add(, , RstProgramas  
                                                                   ("PRO_Codigo").Value, _
                                                                     RstProgramas"PRO_Nombre").Value)

                                               

               RstSubProgramas.Source = "SELECT * " _

                                      & "FROM   Tbl_SubProgramas " _

                                      & "WHERE  SPG_CodProg = '" & RstProgramas("PRO_Codigo").Value & "'"

               RstSubProgramas.ActiveConnection = Cnn

               RstSubProgramas.Open

               Do While Not RstSubProgramas.EOF

                  Set NodX = TvwPrueba.Nodes.Add(RstProgramas("PRO_Codigo").Value, _

                                                 tvwChild, _

                                                 RstSubProgramas("SPG_Codigo").Value, _

                                                 RstSubProgramas("SPG_SubPrograma").Value)

                  RstSubProgramas.MoveNext

               Loop

               

               RstSubProgramas.Close

               RstProgramas.MoveNext

            Loop

           

            Cnn.Close

End Sub

El problema que tengo es que en la lìnea que marquè en rojo me sale el siguiente error: CLAVE INVÀLIDA y no sè porquè ya que verifico y la clave (RstProgramas("PRO_Codigo").Value) es un campo texto de 4 posiciones tiene informaciòn.

Les agradezco de antemano cualquier ayuda al respecto y saludos a todos.

Buenas amigos de SOLOCODIGO.
Tengo el siguiente còdigo que describo a continuaciòn:

Do While Not RstDirGenerales.EOF
      CboProveedores.AddItem Right$(RstDirGenerales
                                                    ("DRG_Codigo").Value,14) " " & _
                                            RstDirGenerales("DRG_DirGeneral").Value

      CboProveedores.ItemData(CboProveedores.NewIndex) =  
                               Right$(RstDirGenerales("DRG_Codigo").Value, 14)
               
      RstDirGenerales.MoveNext
Loop

El problema es que al cargar el formulario me da el error "DESBORDAMIENTO" en la lìnea CboProveedores.ItemData  ............

Estuve leyendo en la ayuda y por lo que entiendo el citado error da porque ITEMDATA acepta solo valores enteros largos, y en este caso estoy tratando de guardar un texto o cadena de 14 posiciones numèricas. Dado que esto es lo que deseo ¿què me sugieren para solventar este inconveniente?

                     Un saludo a todos.

Grácias por las respuestas, pero ya había probado ubicándome en el último registro con Recordser.MoveLast pero me dice un error algo así como que "PROPIEDAD NO ADMITE VUELTA HACIA ATRÁS.
Con relacion a los tipos de cursor que admiten la propiedad RecordCount no estoy muy claro ya que soy relativamente nuevo en el uso de este lenguaje. A continuación les escribo el código que estoy usando y así tal véz les sea más fácil ayudarme:

Dim Cnn As ADO.Connection, _
       Rst  As ADO.Recordset

Set Cnn = New ADODB.Connection
Set Rst = New ADODB.Recordset

Cnn.ConectionString = "Un arvhivo UDL"
Cnn.Open

Rst.Source = "NombreTabla"
Rst.ActiveConnection = Cnn
Rst.Open

If Not Rst.Eof Then
   .....
   ........
   ........
   DataGrid1.Rows = Rst.RecordCount
End If

De nuevo grácias por todo.

Muy buenas amigos de SoloCodigo.
Trabajo en Access 2000 y tengo un informe que tiene 8 niveles de ruptura de control, el informe me trabaja perfectamente bién arrojando los totales apropiados para cada nivel de ruptura. En el PIE de cada nivel yo tengo especificado en su cuadro de propiedades respectivo para la propiedad FORZAR NUEVA PÁGINA el valor DESPUÉS DE LA SECCIÓN, de esta manera cada vez que rompe un nivel dá los totales de ese nivel y salta una página.
El problema es que este es un listado muy enorme y se pierden muchas páginas, lo que a mí me gustaría es que cada vez que rompa un nivel, de los totales e imprima los totales tanto de ese nivel como los que están debajo de él en una sola página y luego salte página. Por ejemplo:
Tengo estos niveles: PROGRAMA, SUBPROGRAMA Y PROYECTO. Cuando rompa control por PROYECTO que de totales de ese proyecto y salte página; cuando rompa control por SUBPROGRAMA que de totales por subprograma y proyecto antes de avanzar de página, y cuando rompa control por PROGRAMA que de los totales de los 3 niveles en una sola página y luego avance a la otra página.
¿Donde tengo que hacer los cambios? ¿En la tabla de propiedades del PIE de cada nivel? ¿ME EXPLIQUÉ?
                            Grácias anticipadas por su interés y apoyo.

El ERROR me da en la primera línea del SELECT CASE, es decir:

SELECT CASE me.TipoPlanilla.value

Gracias por el interés.

Buenas a todos colegas de solo còdigo.
Tengo el siguiente problema: TRabajo en Access 2000 con un informe que maneja un Subinforme; el SubInforme puede variar dependiendo del valor de un campo del Informe principal que es el TIPO DE PLANILLA. Me explico: si TIPO DE PLANILLA = 2 me gustarìa adjuntar el Subinforme ESTACIÒN TRANSMISORA al control SubInforme que he creado dentrol del Informe, si el valor = 3 entonces el subinforme a adjuntar es la ESTACIÒN RECEPTORA y asì sucesivamente.
Como el Subinforme es variable estoy tratando de hacer esto por còdigo en el Evento OPEN del Informe principal.
El problema es que me dà el siguiente mensaje: ERROR 2427 "Introdujo una expresiòn que no tiene valor".
Yo entiendo que en este evento OPEN todavìa no estàn disponibles los datos y que por eso me dà el mensaje de error.
¿Dònde puedo hacer el chequeo del control TIPO DE PLANILLA para tomar las acciones correspondientes dependiendo del valor de este?
                                Espero haberme explicado bièn y gracias anticipadas
                                por cualquier ayuda.