Il blog per tutti gli smanettoni del pc

Lo scopo della funzione gotoxy, presente nella libreria conio.h , è quello di spostare il cursore della console.
DevC++ non contiene la libreria perciò,se non vogliamo installarla, l’unica soluzione è quella di creare la funzione:

#include <windows.h>
#include <stdio.h>
#include <iostream.h>
void gotoxy(int x,int y){     
     HANDLE HConsole;
     CONSOLE_SCREEN_BUFFER_INFO ConsoleInfo;     
     HConsole = GetStdHandle(STD_OUTPUT_HANDLE);
     ConsoleInfo.dwCursorPosition.X = x;
     ConsoleInfo.dwCursorPosition.Y = y;     
     SetConsoleCursorPosition(HConsole,ConsoleInfo.dwCursorPosition);     
}
int main(){
    gotoxy(3,2);
    printf("IOSMANETTO.it\n");
    gotoxy(3,1);
    system("pause");
    return 1;
    }

HANDLE HConsole; HANDLE è simile ad un puntatore ma è piu’ complesso.

CONSOLE_SCREEN_BUFFER_INFO ConsoleInfo; Dichiariamo ConsoleInfo come struttura CONSOLE_SCREEN_BUFFER_INFO . La struttura contiene informazioni sulla console come la posizione del cursore, il colore del testo e dello sfondo ecc.

HConsole = GetStdHandle(STD_OUTPUT_HANDLE); Otteniamo l’Handle della console

ConsoleInfo.dwCursorPosition.X = x; ConsoleInfo.dwCursorPosition.Y = y; Inseriamo le nuove coordinate

SetConsoleCursorPosition(HConsole,ConsoleInfo.dwCursorPosition);
SetConsoleCursorPosition setta la posizione del cursore. Come parametri passiamo l’handle della console e la nuova posizione.

Il framework .net della Microsoft ha veramente cambiato il modo di programmare . Prima per realizzare il seguente programma, occorrevano parecchi minuti se non ore .

Scaricare un file da internet è davvero semplice. Ecco un esempio :

Sub main()
Try
  Dim webC As New Net.WebClient
  Dim patchFile As String = "http://www.google.it/intl/it_it/images/logo.gif"
  Dim filename As String = patchFile.Substring(patchFile.LastIndexOf("/") + 1)
  webC.DownloadFile(patchFile, filename)
Catch ex As Exception
  MsgBox(ex)
End Try
End Sub

1. Sto utilizzando un progetto console di visual studio. Sub Main è la routine principale . Viene invocata all’inizio del programma
2. Try..Catch..End Try è un importante costrutto per la gestione degli errori. Se all’interno di TRY si genera un errore , il programma non viene interrotto , ma viene eseguito il codice all’interno di CATCH
3. Instanziamo la classe Net.WebClient nell’oggetto  WebC
4. patchFile è l’indirizzo del file
5. filename è il nome del file . patchFile.LastIndexOf(“/”) restituisce la posizione dell’ultimo / . Con patchFile.Substring ritagliamo i caratteri che ci servono
6. DownloadFile è il cuore dello script . Come primo parametro occorre fornire l’indirizzo http del file. Il secondo parametro è invece l’indirizzo di destinazione

L’indirizzo di destinazione puo’ essere anche del tipo “C:\mydocument\nomefile.tipo”. Se passiamo solamante il nome del file, come nell’esempio sopra, il download viene salvato nella cartella bin del progetto (Visual Studio 2008\Projects\nameproject\nameproject\bin)

Vi segnalo questa interessante funzione. Ci permette di leggere il codice html di una pagina web.

Function getHtmlCode(ByVal url As String) As String
Dim WebRequest As Net.HttpWebRequest
Dim WebResponse As Net.WebResponse
Dim stream As IO.Stream
Dim streamReader As IO.StreamReader
Try
        WebRequest = Net.WebRequest.Create(url)
        WebRequest.Timeout = 10000
        WebResponse = WebRequest.GetResponse
        stream = WebResponse .GetResponseStream
        streamReader = New IO.StreamReader(stream)
        Return streamReader.ReadToEnd
Catch ex As Exception
            MsgBox(ex.ToString)
End Try
End Function