$B%l%8%9%H%j$NJQ99$K$D$$$F!)(B

Thread View: fj.lang.visualbasic

3 messages

[T] Back to Threads [V] Tree View [G] Group Articles

3 total messages Started by Takashi Miki Mon, 27 Apr 1998 00:00

#76

Author: Takashi Miki
Date: Mon, 27 Apr 1998 00:00

21 lines
1433 bytes

$B=i$a$FEj9F$5$;$F$$$?$@$-$^$9!#(B
miki$B$H$$$$$^$9!"$I$&$>$h$m$7$/$*4j$$$7$^$9!#(B

$B$5$F!"$^$@#V#B=i?4<T$G$9$,!"<ALd$r$5$;$F$/$@$5$$!*!)(B
$B;d$O!"(BVB5.0$B!J(BSP3$B!K$r;HMQ$7$F$$$^$9$,!"(BVB$B$r;H$C$F(B
Windows95$B$NG$0U$N%l%8%9%H%j>pJs$r=q$-49$($kJ}K!(B
$B$r8fB8CN$NJ}$,$*$j$^$7$?$i!"$I$&$>65$($F$/$@$5$$!#(B
$B!!Nc$($P!"%M%C%H%o!<%/$N>pJs$G%3%s%T%e!<%?L>$NFbMF$r(B
$B=q$-49$($k$J$I!"$=$N%3%s%T%e!<%?$NL>A0$r%@%$%"%m%0(B
$B%\%C%/%9$K%F%-%9%H$H$7$FH4$-=P$7I=<($7$F!"%f!<%6!<$,(B
$B$=$l$r=q$-49$($F%j%V!<%H$9$k$H!"%3%s%T%e!<%?$NL>A0$,(B
$BJQ99$G$-$k$h$&$J%W%m%0%i%`$G$9!#(B
$B!!(BDeleteSetting$B$d(BGetSetting$B!"(BGetAllSetting$B!"(BSeveSetting
$B$J$I$N9=J8$r%X%k%W$G8+$F$b!"$I$N$h$&$K$N$>$_$N%l%8%9%H(B
$B%j%-!<$r;XDj$7$?$i$h$$$+$o$+$j$^$;$s!)(B
$B!!$G$-$l$P>e5-$NNc$N$h$&$J%W%m%0%i%`$r9=J8IU$-$G%"%I(B
$B%P%$%9$7$F2<$5$l$P$H;W$$$^$9!#!!$h$m$7$/$*4j$$$7$^$9!#(B

$B!!!!!!!!!!!!!!!!!!;0LZ!!5.;V(B
$B!!!!!!!!!!(BE-Mail$B!!(B=$B!!(Bmiki@bremen.or.jp

Re: レジストリの変更について？

#79

Author: Toshihide Kashima
Date: Tue, 28 Apr 1998 00:00

18 lines
1219 bytes

こんにちは。

> さて、まだＶＢ初心者ですが、質問をさせてください！？
> 私は、VB5.0（SP3）を使用していますが、VBを使って
> Windows95の任意のレジストリ情報を書き換える方法
> を御存知の方がおりましたら、どうぞ教えてください。

VBだけではできません。Windows APIを使います。
余計なことかもしれませんが、もし本当に初心者ならば、
止めた方がいいと思います。危険です。

鹿嶋
--------------------------------------------
 KASHIMA Toshihide (kashima@kenken.go.jp)
  International Institute of Seismology and
  Earthquake Engineering (IISEE),
  Building Research Institute (BRI)

Re: レジストリの変更について？

#82

Author: Teiju Konno
Date: Tue, 28 Apr 1998 00:00

29 lines
1480 bytes

>Windows95の任意のレジストリ情報を書き換える方法
>を御存知の方がおりましたら、どうぞ教えてください。


レジストリ操作はWIN32APIを使用します。
以下WindowsのプロダクトIDを取得する例。

    nRet = RegOpenKeyEx(HKEY_LOCAL_MACHINE,
"SOFTWARE\Microsoft\Windows\CurrentVersion", 0, KEY_READ, hRegKey)
    If nRet = ERROR_SUCCESS Then
        nLen = 256
        nRet = RegQueryValueEx(hRegKey, "ProductId", 0, nType, sBuff, nLen)
        If nRet = ERROR_SUCCESS Then
            sID = Left(sBuff, nLen)
        Else
            sID = "???"
        End If
    Else
        sID = "???"
    End If

値を保存する場合は KEY_READ→KEY_WRITEでオープンし、
RegSetValueExを使用し値を保存します。

（株）ティー・エス・イー
システム開発部　今野
first.group@tseweb.co.jp
konno@kt.rim.or.jp

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads

Thread View: fj.lang.visualbasic

$B%l%8%9%H%j$NJQ99$K$D$$$F!)(B

Re: レジストリの変更について？

Re: レジストリの変更について？

Thread Navigation

$B%l%8%9%H%j$NJQ99$K$D$$$F!)(B