Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
C# / VB.NET - Verifica codice vb
Forum - C# / VB.NET - Verifica codice vb - Pagina 4

Pagine: [ 1 2 3 4 5 ] Precedente | Prossimo
Avatar
luca-94 (Normal User)
Pro


Messaggi: 73
Iscritto: 18/05/2009

Segnala al moderatore
Postato alle 19:18
Domenica, 04/04/2010
Testo quotato

Postato originariamente da Federico_VbNet_Programmer:

Ok allora ti do questo esempio fatto da me tempo fa:

Questo codice è per scrivere

Dim Percorso_File_Della_Cronologia As String = _
    My.Computer.FileSystem.SpecialDirectories.MyDocuments _
    & "\Percorso_File_Della_Cronologia.txt"
My.Computer.FileSystem.WriteAllText(Percorso_File_Della_Cronologia, _
        Me.WebBrowser1.Url.ToString & ",", True)

Questo è per leggere e inserire il contenuto nella listobx1


Me.ListBox1.Items.Clear()
Dim Percorso_File_Della_Cronologia As String = _
My.Computer.FileSystem.SpecialDirectories.MyDocuments _
& "\Percorso_File_Della_Cronologia.txt"
If My.Computer.FileSystem.FileExists(Percorso_File_Della_Cronologia) Then
Dim MyReader As Microsoft.VisualBasic.FileIO.TextFieldParser
MyReader = My.Computer.FileSystem.OpenTextFieldParser( _
    Percorso_File_Della_Cronologia)
MyReader.SetDelimiters(",")
Dim testocronologia As String() = MyReader.ReadFields()
For Each cronologia As String In testocronologia
   If My.Computer.FileSystem.FileExists(cronologia) Then
        Me.ListBox1.Items.Add(cronologia)
   End If
Next
MyReader.Close()
Else
    MsgBox("Il file della cronologia non è esistente.", MsgBoxStyle.OkOnly, _
      Me.Text)
End If

Comunque mi puoi dire come fai a chiudere le TabPages?
Le elimini?




Non Ho capito niente di tutti questi codici per la cronologia dove li devo mettere booo!!!! mistero

PM Quote
Avatar
Federico_VbNet_Programmer (Normal User)
Expert


Messaggi: 222
Iscritto: 03/04/2010

Segnala al moderatore
Postato alle 19:24
Domenica, 04/04/2010
Testo quotato

Postato originariamente da luca-94:

Testo quotato

Postato originariamente da Federico_VbNet_Programmer:

Ok allora ti do questo esempio fatto da me tempo fa:

Questo codice è per scrivere

Dim Percorso_File_Della_Cronologia As String = _
    My.Computer.FileSystem.SpecialDirectories.MyDocuments _
    & "\Percorso_File_Della_Cronologia.txt"
My.Computer.FileSystem.WriteAllText(Percorso_File_Della_Cronologia, _
        Me.WebBrowser1.Url.ToString & ",", True)

Questo è per leggere e inserire il contenuto nella listobx1


Me.ListBox1.Items.Clear()
Dim Percorso_File_Della_Cronologia As String = _
My.Computer.FileSystem.SpecialDirectories.MyDocuments _
& "\Percorso_File_Della_Cronologia.txt"
If My.Computer.FileSystem.FileExists(Percorso_File_Della_Cronologia) Then
Dim MyReader As Microsoft.VisualBasic.FileIO.TextFieldParser
MyReader = My.Computer.FileSystem.OpenTextFieldParser( _
    Percorso_File_Della_Cronologia)
MyReader.SetDelimiters(",")
Dim testocronologia As String() = MyReader.ReadFields()
For Each cronologia As String In testocronologia
   If My.Computer.FileSystem.FileExists(cronologia) Then
        Me.ListBox1.Items.Add(cronologia)
   End If
Next
MyReader.Close()
Else
    MsgBox("Il file della cronologia non è esistente.", MsgBoxStyle.OkOnly, _
      Me.Text)
End If

Comunque mi puoi dire come fai a chiudere le TabPages?
Le elimini?




Non Ho capito niente di tutti questi codici per la cronologia dove li devo mettere booo!!!! mistero



Be tutto dipende...io li metterei al load del form dove vi è la listbox...
Ti faccio un esempino:

Se io sono al form dove visualizzi la cronologia,al load inserisco il codice per leggere e tutto il contenuto del file di testo finisce nella listbox.
Mentre per scrivere la cronologia devi fare doppio click nel webbrowser in modo che ti vada all'evento "DocumentCompleted" e poi inserire il codice per scrivere...

Fatto:D,ma mi sapresti dire come si avanza di stella in questo sito?:hail:

Scusa avevo fatto un errore nel codice di lettura,era per un programma di scrittura:D

Il codice esatto per la lettura è questo:

Me.ListBox1.Items.Clear()
        Dim Percorso_File_Della_Cronologia As String = _
        My.Computer.FileSystem.SpecialDirectories.MyDocuments _
    & "\Percorso_File_Della_Cronologia.txt"
        If My.Computer.FileSystem.FileExists(Percorso_File_Della_Cronologia) Then
            Dim MyReader As Microsoft.VisualBasic.FileIO.TextFieldParser
            MyReader = My.Computer.FileSystem.OpenTextFieldParser( _
                Percorso_File_Della_Cronologia)
            MyReader.SetDelimiters(",")
            Dim testocronologia As String() = MyReader.ReadFields()
            For Each cronologia As String In testocronologia
                Me.ListBox1.Items.Add(cronologia)
            Next
            MyReader.Close()
        Else
            MsgBox("Il file della cronologia non è esistente.", MsgBoxStyle.OkOnly, _
              Me.Text)
        End If

Fatto,stavolta funziona!;)

Ultima modifica effettuata da Federico_VbNet_Programmer il 04/04/2010 alle 19:31
PM Quote
Avatar
a_butta (Member)
Expert


Messaggi: 578
Iscritto: 16/03/2010

Segnala al moderatore
Postato alle 19:29
Domenica, 04/04/2010
allora per il salvataggio della cronologia devi fare in questo modo:

Una volta che l'utente preme invio (quindi tutto verrà inserito all'interno del bottone GO) verrà aperto un file cronox.txt (io lo chiamo così poi tu puoi nominarlo come vuoi. Io ti consiglio di crearlo già da windows normalmente e poi da vb lo modifichi soltanto) e ci verrà scritto dentro il link che ha appena navigato l'utente. Questo dovrebbe essere il codice:

Prima di tutto importi
Codice sorgente - presumibilmente C# / VB.NET

  1. Imports System.Io



Poi il codice nel bottone GO:
Codice sorgente - presumibilmente C# / VB.NET

  1. Dim Scrivi as New StreamWriter("cronox.txt")
  2. Scrivi.Writeln(TextBox1.Text)  'TextBox1 è la barra di navigazione, rinominala secondo il nome della tua
  3. Scrivi.Close



In questo modo al file di testo verrà aggiunta ogni volta la linea della cronologia


PM Quote
Avatar
luca-94 (Normal User)
Pro


Messaggi: 73
Iscritto: 18/05/2009

Segnala al moderatore
Postato alle 19:32
Domenica, 04/04/2010
per aumentare la sella devi avere sufficienti messaggi ti chiedo per favore mi potresti mandare un source visual vasic 08 con allinterno questo codice perche non riesco a posizionarlo grazie 1000:k


PS.se vuoi me lo puoi mandare a giardina-luca@msn.com

PM Quote
Avatar
Federico_VbNet_Programmer (Normal User)
Expert


Messaggi: 222
Iscritto: 03/04/2010

Segnala al moderatore
Postato alle 19:34
Domenica, 04/04/2010
Testo quotato

Postato originariamente da a_butta:

allora per il salvataggio della cronologia devi fare in questo modo:

Una volta che l'utente preme invio (quindi tutto verrà inserito all'interno del bottone GO) verrà aperto un file cronox.txt (io lo chiamo così poi tu puoi nominarlo come vuoi. Io ti consiglio di crearlo già da windows normalmente e poi da vb lo modifichi soltanto) e ci verrà scritto dentro il link che ha appena navigato l'utente. Questo dovrebbe essere il codice:

Prima di tutto importi
Codice sorgente - presumibilmente C# / VB.NET

  1. Imports System.Io



Poi il codice nel bottone GO:
Codice sorgente - presumibilmente C# / VB.NET

  1. Dim Scrivi as New StreamWriter("cronox.txt")
  2. Scrivi.Writeln(TextBox1.Text)  'TextBox1 è la barra di navigazione, rinominala secondo il nome della tua
  3. Scrivi.Close



In questo modo al file di testo verrà aggiunta ogni volta la linea della cronologia




E poi come farebbe a riprendere la cronologia?:D

Il mio metodo è lungo ma funziona,faccio come le pubblicità xD,100% garantito:rofl:

PM Quote
Avatar
luca-94 (Normal User)
Pro


Messaggi: 73
Iscritto: 18/05/2009

Segnala al moderatore
Postato alle 19:42
Domenica, 04/04/2010
Testo quotato

Postato originariamente da Federico_VbNet_Programmer:

Testo quotato

Postato originariamente da a_butta:

allora per il salvataggio della cronologia devi fare in questo modo:

Una volta che l'utente preme invio (quindi tutto verrà inserito all'interno del bottone GO) verrà aperto un file cronox.txt (io lo chiamo così poi tu puoi nominarlo come vuoi. Io ti consiglio di crearlo già da windows normalmente e poi da vb lo modifichi soltanto) e ci verrà scritto dentro il link che ha appena navigato l'utente. Questo dovrebbe essere il codice:

Prima di tutto importi
Codice sorgente - presumibilmente C# / VB.NET

  1. Imports System.Io



Poi il codice nel bottone GO:
Codice sorgente - presumibilmente C# / VB.NET

  1. Dim Scrivi as New StreamWriter("cronox.txt")
  2. Scrivi.Writeln(TextBox1.Text)  'TextBox1 è la barra di navigazione, rinominala secondo il nome della tua
  3. Scrivi.Close



In questo modo al file di testo verrà aggiunta ogni volta la linea della cronologia




E poi come farebbe a riprendere la cronologia?:D

Il mio metodo è lungo ma funziona,faccio come le pubblicità xD,100% garantito:rofl:



gentilmente mi mandi un esempio per favore. javascript:addsmile(':hail:')

PM Quote
Avatar
Federico_VbNet_Programmer (Normal User)
Expert


Messaggi: 222
Iscritto: 03/04/2010

Segnala al moderatore
Postato alle 19:46
Domenica, 04/04/2010
Be ho sbagliato di nuovo il codice...stavolta però l'ho testato prima e funziona al 1000000%
Ecco il codice per leggere esatto:

Me.ListBox1.Items.Clear()
        Dim Percorso_File_Della_Cronologia As String = _
        My.Computer.FileSystem.SpecialDirectories.MyDocuments _
    & "\Percorso_File_Della_Cronologia.txt"
        If My.Computer.FileSystem.FileExists(Percorso_File_Della_Cronologia) Then
            Dim MyReader As Microsoft.VisualBasic.FileIO.TextFieldParser
            MyReader = My.Computer.FileSystem.OpenTextFieldParser( _
                Percorso_File_Della_Cronologia)
            MyReader.SetDelimiters(",")
            Dim testocronologia As String() = MyReader.ReadFields()
            Try
                For Each cronologia As String In testocronologia
                    If (cronologia = "") Then
                    Else
                        Me.ListBox1.Items.Add(cronologia)
                    End If
                Next
            Catch ex As Exception

            End Try
            MyReader.Close()
        Else
            MsgBox("Il file della cronologia non è esistente.", MsgBoxStyle.OkOnly, _
              Me.Text)
        End If

PM Quote
Avatar
Federico_VbNet_Programmer (Normal User)
Expert


Messaggi: 222
Iscritto: 03/04/2010

Segnala al moderatore
Postato alle 19:54
Domenica, 04/04/2010
Ecco il tuo esempio:k:


Federico_VbNet_Programmer ha allegato un file: esempio cronologia.zip (114594 bytes)
Clicca qui per scaricare il file
PM Quote
Pagine: [ 1 2 3 4 5 ] Precedente | Prossimo