0

私はvb 2012が初めてで、2つの異なるVB6ソースを適用しようとしたときに、このソースvb 2012の使用方法をグーグルで検索しましたが、見つかりませんでした。 vb 2012 のソース、次のソース コードは

FileTek を文字列として薄暗くする

FileTeks = App.Path & "\conn.ini"

ユーザー名 = トリム (txtUserName.Text)

パス = トリム (txtPassword.Text)

サーバー = トリム (txtServer.Text)

出力用に FileTeks を #1 として開く

プリント #1、エンクリプ(サーバー、4)

プリント #1、エンクリプ(ユーザー名、4)

プリント #1、エンクリプ(パス、4)

#1を閉じる

助けてくれてありがとう

4

2 に答える 2

0

.NET でファイルに書き込む 1 つの方法を次に示します。

Using sw As New System.IO.StreamWriter("FileTeks.ini", False)
        sw.WriteLine(Enkrip(Server,4))
        sw.WriteLine(Enkrip(UserName,4))
        sr.WriteLine(Enkrip(Pass,4))

        sw.Flush()
        sw.Close()
End Using

これは、からの出力が文字列であることを前提としていEnkripます。または(iniであるため):

sw.WriteLine("{0} = {1}", "Server", Enkrip(Server,4))
' or
sw.WriteLine("{0} {1}", "Server =", Enkrip(Server,4))

行全体を暗号化するのではなく、それらを再度読み取ることができるように、おそらく平文の「キー」が必要です。また、ファイル名が悪いか、トラップできる権限に問題があるように、すべてをTry/Catchに入れたいと思うでしょう。

別の方法として、PInvoke を使用して古い Win32 Read/WritePrivateProfileString を使用することもできます。

HTH

于 2013-09-13T13:22:10.587 に答える
0

.net の VisualBasic パッケージを使用すると、VB6 独自のコマンドのほとんどを見つけることができるはずです。いずれにせよ、vb.net は vb6 の単なるアップグレードではなく、まったく異なる言語です。

コード ベースが大きすぎない場合は、コードをリファクタリングすることをお勧めします。一度 vb6 から vb.net への自動変換を行いましたが、今では後悔しています。

于 2013-09-13T13:28:21.373 に答える