Hola buenas tardes a ver si me pueden ayudar ya que llevo medio día pegándome con este código pero lo logro sacar lo que necesito.

El código es este

$fname= $_GET["valor"];
 
 
function findAllDirs($start) {
    $dirStack=[$start];
    while($dir=array_shift($dirStack)) {
        $ar=glob($dir.'/*',GLOB_ONLYDIR|GLOB_NOSORT);
        if(!$ar) continue;
 
        $dirStack=array_merge($dirStack,$ar);
        foreach($ar as $DIR)
            yield $DIR;
    }
}
 
 
$result=[];
foreach(findAllDirs('D:\xampp\htdocs\www\serverpruebas') as $dir) {
    $match=glob($dir.'/'.$fname,GLOB_NOSORT);
    if(!$match) continue;
 
    $result=array_merge($result,$match);
 
}
 
echo '<pre>';
print_r($result);
echo '</pre>';

Y el resultado es este:

Array
(
    [ 0 ] => D:\xampp\htdocs\www\serverprueba\COMMAND.arc
)

Y lo que estoy intentado hacer es esto:

    [ 0 ] => Array
        (
            [name] => COMMAND.arc
            [size] => 21160480
            [date] => 2015-06-02 16:48:05
        )


Espero que me puedan ayudar.

Un saludo y gracias de antemano

Hola buenas, lo que ando intentando es sacar 3 datos de 2 tablas diferentes. las consultas que tengo son estas:

SELECT fecha_descargas_dia, SUM(num_descargas_dia) num_descargas_dia FROM descargas_dia GROUP BY fecha_descargas_dia ASC

que devuelve estos datos

|2014-08-01|1
|2014-08-02|7
|2014-08-03|10
|2014-08-04|11
|2014-08-05|8

 y esta otra:

SELECT fecha_instalaciones_dia, SUM(num_instalaciones_dia) num_instalaciones_dia FROM instalaciones_dia GROUP BY fecha_instalaciones_dia ASC

que devuelve estos datos

|2014-08-01|2
|2014-08-02|20
|2014-08-03|15
|2014-08-04|12
|2014-08-05|5

Lo que llevo 3 horas intentando es que me de el mismo día con lo 2 datos de las tablas

|2014-08-02|7|20

Espero que me puedan ayudar.

Un saludo y mil gracias de antemano!

HOla buenas, llevo toda la mañana mirando como crear un boton(justo al lado de atras) en el apartado de la selección de los complementos, y que cuando se pulse en el aparezca como un label que muestre lo que tengo generado en el codigo.

[Setup]
Appname=My Program
AppVername=My Program version 1.5
DefaultDirname=%25257Bpf%25257D%25255CMy Program
DefaultGroupname=My Program
OutputDir=.
 
[Types]
Name: "full"; Description: "Full installation"
Name: "compact"; Description: "Compact installation"
Name: "custom"; Description: "Custom installation"; Flags: iscustom
 
[Components]
Name: "program"; Description: "Program Files"; Types: full compact custom; Flags: fixed
Name: "help"; Description: "Help File"; Types: full
Name: "readme"; Description: "Readme File"; Types: full
Name: "readme\en"; Description: "English"; Flags: exclusive
Name: "readme\de"; Description: "German"; Flags: exclusive
 
[Files]
Source: descctrl.dll; Flags: dontcopy
 
[_Code]
#ifdef UNICODE
  #define AW "W"
#else
  #define AW "A"
#endif
 
type
  HMONITOR = THandle;
  TMonitorInfo = record
    cbSize: DWORD;
    rcMonitor: TRect;
    rcWork: TRect;
    dwFlags: DWORD;
  end;
 
const
  MONITOR_DEFAULTTONULL = $0;
  MONITOR_DEFAULTTOPRIMARY = $1;
  MONITOR_DEFAULTTONEAREST = $2;
 
function GetMonitorInfo(hMonitor: HMONITOR; out lpmi: TMonitorInfo): BOOL;
  external 'GetMonitorInfo{#AW}@user32.dll stdcall';
function MonitorFromWindow(hwnd: HWND; dwFlags: DWORD): HMONITOR;
  external 'MonitorFromWindow@user32.dll stdcall';
 
procedure CenterForm(Form: TForm; Horz, Vert: Boolean);
var
  X, Y: Integer;
  Monitor: HMONITOR;
  MonitorInfo: TMonitorInfo;
begin
  if not (Horz or Vert) then
    Exit;
  Monitor := MonitorFromWindow(Form.Handle, MONITOR_DEFAULTTONEAREST);
  MonitorInfo.cbSize := SizeOf(MonitorInfo);
  if GetMonitorInfo(Monitor, MonitorInfo) then
  begin
    if not Horz then
      X := Form.Left
    else
      X := MonitorInfo.rcWork.Left + ((MonitorInfo.rcWork.Right -
        MonitorInfo.rcWork.Left) - Form.Width) div 2;
    if not Vert then
      Y := Form.Top
    else
      Y := MonitorInfo.rcWork.Top + ((MonitorInfo.rcWork.Bottom -
        MonitorInfo.rcWork.Top) - Form.Height) div 2;
    Form.SetBounds(X, Y, Form.Width, Form.Height);
  end;
end;
 
 
function enabledesc(ComponentsListHandle: HWND; DescLabelHandle: HWND; DescStrings: PChar): BOOL; external 'enabledesc@files:descctrl.dll stdcall';
function disabledesc(): BOOL; external 'disabledesc@files:descctrl.dll stdcall';
 
var
  Info: TNewStaticText;
  InfoCaption: TNewStaticText;
  InfoPanel: TPanel;
 
procedure DeinitializeSetup();
begin
  disabledesc();
end;
 
type
  TPositionStorage = array of Integer;
 
var
  CompPageModified: Boolean;
  CompPagePositions: TPositionStorage;
 
procedure SaveComponentsPage(out Storage: TPositionStorage);
begin
  SetArrayLength(Storage, 10);
 
  Storage[0] := WizardForm.Height;
  Storage[1] := WizardForm.NextButton.Top;
  Storage[2] := WizardForm.BackButton.Top;
  Storage[3] := WizardForm.CancelButton.Top;
  Storage[4] := WizardForm.ComponentsList.Height;
  Storage[5] := WizardForm.OuterNotebook.Height;
  Storage[6] := WizardForm.InnerNotebook.Height;
  Storage[7] := WizardForm.Bevel.Top;
  Storage[8] := WizardForm.BeveledLabel.Top;
  Storage[9] := WizardForm.ComponentsDiskSpaceLabel.Top;
end;
 
procedure LoadComponentsPage(const Storage: TPositionStorage;
  HeightOffset: Integer);
begin
  if GetArrayLength(Storage) <> 10 then
    RaiseException('Invalid storage array length.');
 
  WizardForm.Height := Storage[0] + HeightOffset;
  WizardForm.NextButton.Top := Storage[1] + HeightOffset;
  WizardForm.BackButton.Top := Storage[2] + HeightOffset;
  WizardForm.CancelButton.Top := Storage[3] + HeightOffset;
  WizardForm.ComponentsList.Height := Storage[4] + HeightOffset;
  WizardForm.OuterNotebook.Height := Storage[5] + HeightOffset;
  WizardForm.InnerNotebook.Height := Storage[6] + HeightOffset;
  WizardForm.Bevel.Top := Storage[7] + HeightOffset;
  WizardForm.BeveledLabel.Top := Storage[8] + HeightOffset;
  WizardForm.ComponentsDiskSpaceLabel.Top := Storage[9] + HeightOffset;
end;
 
 
 
// Meter esto al pulsar el botón detalles
  procedure InitializeWizard();
  begin
    WizardForm.ComponentsList.Height := ScaleY(90);
    WizardForm.ComponentsList.Width := ScaleX(415);
 
    InfoPanel := TPanel.Create(WizardForm);
    InfoPanel.Parent := WizardForm.SelectComponentsPage;
    InfoPanel.Top := Scaley(360);
    InfoPanel.Left := ScaleX(0);
    InfoPanel.Width := WizardForm.ComponentsList.Width;
    InfoPanel.Height := ScaleY(50);
    InfoPanel.BevelInner := bvRaised;
    InfoPanel.BevelOuter := bvLowered;
    Info := TNewStaticText.Create(WizardForm);
    Info.Parent := InfoPanel;
    Info.AutoSize := true;
    Info.Left := ScaleX(6);
    Info.Width := ScaleX(400);
    Info.Top := ScaleY(5); // Linea de texto
    Info.WordWrap := true;
    enabledesc(WizardForm.ComponentsList.Handle,Info.Handle,
          // Sustituir por ExpandConstant('{cm:Descripcion};') +
         'Descrip. Program Files;'+
         'Descrip. Help File;'+
         'Descrip. Readme File;'+
         'Descrip. English;'+
         'Descrip. German;'
         );
 
    begin
      CompPageModified := False;
    end;
  end;
// Meter esto al pulsar el botón detalles
 
 
procedure CurPageChanged(CurPageID: Integer);
begin
  if CurpageID = wpSelectComponents then
  begin
    SaveComponentsPage(CompPagePositions);
    LoadComponentsPage(CompPagePositions, 200);
    CenterForm(WizardForm, False, True);
    CompPageModified := True;
  end
  else
  if CompPageModified then
  begin
    LoadComponentsPage(CompPagePositions, 0);
    CenterForm(WizardForm, False, True);
    CompPageModified := False;
  end;
end;
 

Espero que me podais hechar una mano ya no se donde mirar ya que no encuentro mucha informacion.
Un saludo y mil gracias de antemano

Hola buenas tardes, llevo unos días comiéndome la cabeza...

 Lo que quiero hacer es que cuando ejecuto el setup, comprueba las nuevas actualizaciones.
1) si no hay una nueva actualización, no mostrar ningún mensaje.
2) y si hay una nueva actualización, aparece un mensaje preguntando si desea descargarlo y que lleve a una web o no.

El codigo de pascal es este:

function DownloadFile(const AURL: string; var AResponse: string): Boolean;
var
  WinHttpRequest: Variant;
begin
  Result := True;
  try
    WinHttpRequest := CreateOleObject('WinHttp.WinHttpRequest.5.1');
    WinHttpRequest.Open('GET', AURL, False);
    WinHttpRequest.Send;
    AResponse := WinHttpRequest.ResponseText;
  except
    Result := False;
    AResponse := GetExceptionMessage;
  end;
end;
 
procedure InitializeWizard;
var
  DxLastVersion: string;
 
begin
  if DownloadFile('http://dex.wotanksmods.com/latestver.txt', DxLastVersion)  then
    MsgBox(DxLastVersion, mbInformation, MB_YESNO)
  else
    MsgBox(DxLastVersion, mbError, MB_OK)
end;

Sobre la versión he leído por hay que al ser x.x.x parece mas complejo el código ya me da lo mismo que sea así que sea xxx

Espero que alguien pueda ayudarme se lo agradecería en el alma de verdad.

Un saludo y mil gracias de antemano.

 Hola buenas no llevo mucho en este tema y tengo 2 problemas.

1 me gustaría hacer una función que eliminara un directorio.
actualmente tengo esto:

Source: "F:\Mods\Desarrollo\Doc\ModPack.txt"; DestDir: {app}; Components: instalacionsi; Check: instalacion_limpia;
 
function instalacion_limpia(): Boolean;
begin
DelTree('C:\Games\World_of_Tes\tres_mods*', False, True, True);
end;

pero me genera un error o aviso: Warning: Line 161, Column 10: Variable 'Result' never used

2 me gustaría hacer una función que genere un backup y elimine el directorio original o creo que sera lo mas facil que lo renombre en una ruta ( de este no he logrado nada)

un saludo y mil gracias

Hola buenas a todos, tengo un problemilla con un código que ando montando y no tengo manera de que funcione siempre me tira este error:


y ya no se como ponerlo he probado de todas las formas pero nada, si podrían echarme una mano os lo agradecería.

CREATE TABLE IF NOT EXISTS `maca_configuracion` (
  `idconfiguracion` INT(1) NOT NULL,
  `tituloweb` VARCHAR(255) NOT NULL,
  `descripcionweb` VARCHAR(255) NOT NULL,
  `keywords` VARCHAR(255) NOT NULL,
  `alexaverifyid` VARCHAR(50) NOT NULL,
  `msvalidate` VARCHAR(50) NOT NULL,
  `google` VARCHAR(50) NOT NULL,
  `adminemail` VARCHAR(100) NOT NULL,
  `personalemail` VARCHAR(100) NOT NULL,
  `titulomensajes` VARCHAR(255) NOT NULL,
  `semanal` VARCHAR(50) NOT NULL,
  `horario` VARCHAR(50) NOT NULL,
  `telefono` VARCHAR(20) NOT NULL,
  `tiempo` INT(1) NOT NULL
) ENGINE=MyISAM DEFAULT CHARSET=latin1;

<?php
if (!isset($_GET["accion"])){
 
    echo'<form method="post" action="http://www.otros.com/index.php?sección=administracion&amp;area=areaconfig&amp;accion=guardar" enctype="multipart/form-data" >
	<fieldset>
                 <legend>Configuraci&oacute;n Web</legend>
                 <div>
                     <label for="tituloweb"><strong>Nombre Web</strong>:</label>
                     <input type="text" id="tituloweb" name="tituloweb" size="20" maxlength="127" value="'.$tituloweb .'"/>
                 </div>
                 <div>
                     <label for="descripcionweb"><strong>Descripcion Web</strong>:</label>
					 <textarea name="descripcionweb"  id="descripcionweb" cols="4" rows="4"  maxlength="255"wrap="virtual">'.$descripcionweb.'</textarea>
                 </div>
				 <br /><br /><br /><br />
                 <div>
                     <label for="keywords"><strong>Keywords</strong>:</label>
					 <textarea name="keywords"  id="keywords" cols="4" rows="4"  maxlength="255"wrap="virtual">'.$keywords.'</textarea>
                 </div>
                 <div>
                     <label for="alexaverifyid"><strong>Alexa ID</strong>:</label>
                     <input type="text" id="alexaverifyid" name="alexaverifyid" size="40" maxlength="50" value="'.$alexaverifyid.'"/>
                 </div>
				<div>
                     <label for="msvalidate"><strong>Microsoft Id</strong>:</label>
                     <input type="text" id="msvalidate" name="msvalidate" size="40" maxlength="127" value="'.$msvalidate.'"/>
                 </div>
				 <div>
                     <label for="google"><strong>Google ID</strong>:</label>
                     <input type="text" id="google" name="google" size="40" maxlength="127" value="'.$google.'"/>
                 </div>
				<br /><br />
				<div>
                     <label for="adminemail"><strong>Admin Email</strong>:</label>
                     <input type="text" id="adminemail" name="adminemail" size="40" maxlength="127" value="'.$adminemail.'"/>
                 </div>
				 <div>
                     <label for="personalemail"><strong>Personale Email</strong>:</label>
                     <input type="text" id="personalemail" name="personalemail" size="40" maxlength="127" value="'.$personalemail.'"/>
                 </div>				 
				<div>
                     <label for="titulomensajes"><strong>Titulos Asunto</strong>:</label>
                     <input type="text" id="titulomensajes" name="titulomensajes" size="40" maxlength="255" value="'.$titulomensajes.'"/>
                 </div>
				 <br /><br />
				 <div>
                     <label for="semanal"><strong>Trabajo de:</strong>:</label>
                     <input type="text" id="semanal" name="semanal" size="40" maxlength="127" value="'.$semanal.'"/>
                 </div>
				 <div>
                     <label for="horario"><strong>Horario de</strong>:</label>
                     <input type="text" id="horario" name="horario" size="40" maxlength="127" value="'.$horario.'"/>
                 </div>
				 <div>
                     <label for="telefono"><strong>Tel&eacute;fono</strong>:</label>
                     <input type="text" id="telefono" name="telefono" size="40" maxlength="127" value="'.$telefono.'"/>
                 </div>
				 <div>
                     <label for="tiempo"><strong>El Tiempo</strong>:<br/><small> Ahora:'; echo ($seccionweb != 0) ? 'Aemet' : 'El tiempo'; echo '</label>
					<select name="tiempo" id="tiempo" size="1">
					  <option>Selecciona...</option>
					  <option value="0">Aemet</option>
					  <option value="1">El Tiempo</option>
					</select>
                 </div>
				 <div>
                	<label for="envio">&nbsp;</label>
                    <input name="enviar" value="Enviar" type="submit" class="boton"/>
               </div>
				 </form>';
 
}elseif($_GET["accion"]== "guardar" ){
 
	// Recojo valores
		$tituloweb		=$_POST["tituloweb"];
		$descripcionweb	=$_POST["descripcionweb"];
		$keywords		=$_POST["keywords"];
		$alexaverifyid	=$_POST["alexaverifyid"];
		$msvalidate		=$_POST["msvalidate"];
		$google			=$_POST["google"];
		$adminemail		=$_POST["adminemail"];
		$personalemail	=$_POST["personalemail"];
		$titulomensajes	=$_POST["titulomensajes"];
		$semanal		=$_POST["semanal"];
		$telefono		=$_POST["telefono"];
		$tiempo			=$_POST["tiempo"];
		$idconfiguracion= '0';
 
 
$result =mysql_query("UPDATE ".$prefix."_configuracio SET tituloweb=$tituloweb, descripcionweb=$descripcionweb, keywords=$keywords, alexaverifyid=$alexaverifyid, msvalidate=$msvalidate ,google=$google, adminemail=$adminemail, personalemail=$personalemail, titulomensajes=$titulomensajes, semanal=$semanal, horario=$horario, telefono=$telefono, tiempo=$tiempo WHERE idconfiguracion=='$idconfiguracion'") or die(mysql_error()); 
}
 
?>

Un saludo y gracias de antemano

Hola a todos, esta es la primera vez que posteo, les cuento que soy nuevo en php y mysql y me encuentro muy entretenido aprendiendo todos los dias algo nuevo, pero el tema en cuestion es que tengo un problema que no me ha dejado avanzar.

He tratado de desarrollar un sistema de categorias y subcategorias usando tablas relacionadas pero no lo he logrado, mi idea por el momento es generar un menu como este:

Categoria 1

    SubCategoria1

    SubCategoria2

    SubCategoria3

Categoria 2

    SubCategoria1

    SubCategoria2

    SubCategoria3

Categoria 3

    SubCategoria1

    SubCategoria2

    SubCategoria3


La estructura de las tablas que estoy usando es la siguiente:


Estructura de tabla para la tabla `categorias`

CREATE TABLE `categorias` (
`categoria_id` INT(10) NOT NULL AUTO_INCREMENT,
`categoria_nombre` VARCHAR(150) NOT NULL,
PRIMARY KEY (`categoria_id`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=6 ;

Estructura de tabla para la tabla `subcategorias`

CREATE TABLE `subcategorias` (
`subcategoria_id` INT(10) NOT NULL AUTO_INCREMENT,
`categoria_id` INT(10) NOT NULL,
`subcategoria_nombre` VARCHAR(150) NOT NULL,
PRIMARY KEY (`subcategoria_id`)
) ENGINE=InnoDB DEFAULT CHARSET=latin1 AUTO_INCREMENT=8 ;
 

Hasta el momento lo mejor que he logrado es generando la consulta de este modo, pero el resultado que me muestra no es el que yo quiero.

Categoria 1
Categoria 2
Categoria 5
Categoria 4

1
    SubCategoria1

    SubCategoria2

    SubCategoria3

2
    SubCategoria1

    SubCategoria2

    SubCategoria3

3
    SubCategoria1

    SubCategoria2

    SubCategoria3

<?php
// Ejemplo de Conexion a base de datos
	$servidor			='localhost'; 
	$basedatos			='tutorial'; 
	$usuario_basedatos	='tutorial';	
	$clave_basedatos	='XXXX';	
 
 
//Conectamos con el servidor
	$db=@mysql_connect($servidor,$usuario_basedatos,$clave_basedatos);
 
mysql_select_db($basedatos);
 
 
$sqlQuery = mysql_query("SELECT categorias.*, subcategorias.* FROM categorias, subcategorias
                         WHERE categorias.categoria_id = subcategorias.categoria_id
                         ORDER BY subcategorias.subcategoria_id ASC", $db) or die(mysql_error());
 
$categoria = "";
$categorias = array();
$pos = 0;
 
while ($row = mysql_fetch_object($sqlQuery)){
    if($categoria != $row -> categoria_id){
        echo "<h3>".$row -> categoria_nombre."...</h3>";
        $categoria = $row -> categoria_id;
        $pos = array_push( $categorias,  array( $categoria, array() ) );
    }    
    $categorias[$pos][1][] = array($row->subcategoria_id, $row -> subcategoria_nombre);
 
}
 
foreach ($categorias as $categoria)
{
    if( !empty( $categoria[0] ) ) {
           echo "<h1>" . $categoria[0] . "</h1>";
    }
    if (count($categoria[1]) > 0)
    {
        echo "<ul>";
        foreach ($categoria[1] as $subCat)
        {
            echo "<li><a href='index.php?mod=categorias&amp;categoria_id=" . $subCat[0] . "'>" .
                $subCat[1] . "</a></li>";
        }
        echo "</ul>";
    }
}  
?> 

Pero no logro sacar como lo quiero, espero que me podáis ayudar.

Un saludo y gracias de nuevo

Hola amigos soy algo nuevo en Jquery y tengo este script

$(document).ready(function()
{
	$(".like").click(function()
	{
			var id=$(this).attr("id");
			var name=$(this).attr("name");
			var dataString = 'id='+ id + '&name='+ name;
 
		$("#votebox").slideDown("slow");
		$("#flash").fadeIn("slow");
 
		$.ajax
		({type: "POST",url: "rating.php",data: dataString,cache: false,success: function(html)
		{
			$("#flash").fadeOut("slow");
			$("#content").html(html);
			$("#pruebas").fadeOut("hide");
		} 
	});
	});
 
	$(".close").click(function()
	{
	$("#votebox").slideUp("slow");
	});
});

y me gustaria que cuando haga este paso

$.ajax
		({type: "POST",url: "rating.php",data: dataString,cache: false,success: function(html)
		{
			$("#flash").fadeOut("slow");
			$("#content").html(html);
			$("#pruebas").fadeOut("hide");
		} 

desde hay podria sacar una coockie para que se quedara oculto y nose ocmo hacerlo

UN saludo y gracias

Hola amigos ando haciendo un sistema y tengo un problemilla ya que mi idea es que solo se muestren los tutoriales que yo active (desde registro 0 y 1 ovio) pero no se como hacerlo. Aqui os dejo un trozo del codigo.

	//Consulta para mostrar el total de resultados
		$sql1 = "SELECT * FROM ".$prefix."_tutoriales ORDER BY Tid DESC"; 
	// mostrar la cantidad de resultados
		$rowsperpage = 9; 
	// url de la web para la indexacion esta parte falta mejorar xD
		//$website = "?id=1"; /
	// Creando Objetivo	
		$pagination = new CSSPagination($sql1, $rowsperpage, $website); 
	// la paginacion en GET xD
		$pagination->setPage($_GET[page]); 
 
	$result=mysql_query("SELECT * FROM ".$prefix."_tutoriales ORDER BY Tid DESC LIMIT " . $pagination->getLimit() . ", " . $rowsperpage) or die(mysql_error()); 
	while ($row=mysql_fetch_array($result))
	{
		echo"........";
         }

Un saludo y gracias de ante mano

Hola amigos, hace mucho que no me paso por aqui... Pero a lo que venia, encontrado este curioso sistema  y funciona de lujo pero encuentro un problema, en las paginas que tiene lo que pongo en php no lo muestra e probado de mil y una forma pero nada

Sistema
http://tutorialzine.com/2009/09/simple-ajax-website-jquery/

if(file_exists(‘pages/page_’.$page.’.php’))
echo file_get_contents(‘pages/page_’.$page.’.php’);

Codigo cambiado para que muestre en PHP las extensiones.

Pero nada de contenido como comentaba. Alguna idea?

Gracias de antemano