2013-10-16 106 views
0

在我的VB應用程序開始時,我要求用戶將他的電子郵件和密碼輸入到兩個文本框中。如果登錄成功,我想將輸入的電子郵件和密碼保存爲Login.txt文件到相關目錄中。我想覆蓋文件中的所有舊信息。在VB中保存用戶輸入

我希望每次應用程序啓動;它會讀取這個Login.txt文件,並在相同的兩個文本框中顯示電子郵件和密碼,所以用戶在每次登錄時都不需要輸入它。

什麼是正確的代碼?

謝謝你的幫助。

+1

不要以純文本保存密碼。相反,請保存服務器上的可撤銷令牌,如OAuth 2. – SLaks

+4

如果您保存所有登錄信息以備下次使用時,爲什麼還要使用登錄?你至少應該要求你的用戶輸入他的密碼。 – 2013-10-16 19:04:58

+1

進入項目 - >屬性 - >設置。如果你沒有設置自動保存,那麼它就是'My.Settings.Save'。 – Plutonix

回答

0

首先您需要遵循@Plutonix註釋步驟, 您可以創建兩個新的設置作爲字符串類型並選擇「用戶」作用域(不是應用程序),並且還要確保保留爲空的默認值。

My.Settings.Email = EmailTextBox.text 
My.Settings.Pass = PassTextBox.text 

並加載值:

在你的代碼,當你想你可以做到這一點,以每次保存值

所以

EmailTextBox.text = My.Settings.Email 
PassTextBox.text = My.Settings.Pass 
0

我一直在使用這種方法沿時間我認爲這會對你有所幫助。 當你打開VB雙擊soloution資源管理器「我的項目」 它會出現在你需要點擊設置選項卡的窗口邊上的選項卡。它會出現一個表格,其中一行將有名稱「設置」。在你的情況下,你想命名爲「電子郵件」,然後按回車。再次出現一行將名稱從「設置」更改爲「密碼」,然後按Enter鍵。當你這樣做的部分是這樣的編碼部分:

編碼:

Textbox1.text = my.settings.email

Textbox2.text = my.settings.password

我。 settings.save

好了,所以這是編碼的方式進行

所有你現在需要做的是插入上述編碼成的編碼按鈕,您要點擊以記住詳細信息。 然後,在完成該步驟後,單擊調試或播放按鈕或(f5)鍵。

希望這對你的作品,如果它不

感謝

+0

而且沒有加密? –

0

希望下面的參考會給解決您的問題

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     pth = "d:\user_login" 
     If Directory.Exists(pth) = False Then 
      Directory.CreateDirectory(pth) 'create a folder in the path is no such folder is existing 
     End If 
    End Sub 

這將創建一個目錄,我將編輯在您的D:驅動器在第一次運行

Private Sub login_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles login.Click 
     ' works like session veriables 
     uname = username.Text ' store user name to a public verible for future reference till the application restarted 
     pwd = pasword.Text ' store password to a public verible for future reference till the application restarted 
     'save user name and password as small text file for future reference 
     'Dim rtc As New RichTextBox 
     rtc.Clear() ' clear the rtc content 
     rtc.Text = "Username :" & username.Text & Chr(13) & "Password :" & pasword.Text 'create a text document and write values on it 
     rtc.SaveFile(pth & "\" & Now.Month.ToString & Now.Day & "_" & Now.Hour.ToString & "_" & Now.Minute.ToString & ".txt") 'save the document in the above path with current date and time as name 
    End Sub 
相關問題