SE向けの日々の小ネタ

04

2025/05

06

S	M	T	W	T	F	S
				1	2	3
4	5	6	7	8	9	10
11	12	13	14	15	16	17
18	19	20	21	22	23	24
25	26	27	28	29	30	31

スポンサードリンク

2025/05/21 (Wed)

世の中VB.netの時代ですが、まだまだ過去のプログラムを
修正したり、ちょっとした簡単なものを作る時にVB6を使っています。

ブーイングが起きそうな感じですが、.NETも勉強しないとなぁ。

さて、先日、VB6でSQL接続の方法を教えてくれと
後輩から聞かれたのでちょっとおさらいがてら書こうかと思います。

VB6でSQLを使う場合にはADO接続をする必要があるということです。

サンプルのコードを書くと。

・まず、ADOの接続のためのインスタンスを生成します。

Dim aConnect as ADODB.Connection
Set aConnect = New ADODB.Connection

・次に文字列の生成、Driver、Server、Databaseを指定します。
Dim StrSQLConnect As String
StrSQLConnect = StrSQLConnect & "Driver={SQL Server};"
StrSQLConnect = StrSQLConnect & "Server=ServerName;"
StrSQLConnect = StrSQLConnect & "Database=Northwind;"

・DB接続
Call aConnect.Open(StrSQLConnect)

最後はDB接続の終了も
aConnect.Close
Set aConnect = Nothing

あとは頑張れ！後輩！

スポンサードリンク

2008/03/25 (Tue) VB

あまりVBでdllを呼び出すというのを使ってなかったのですが
先日、ちょっと他社で開発されたインターフェースをのせるのに
VBで開発するということになったのでVB6でdllを呼び出すことになりました。

ある程度参考書や、会社の先輩に話を聞いたものの
やはり自分で納得いくまでやる性格のため、
ネットなどでもいろいろ調べてみました。

一応自分のために、覚えておくためにも、
「Declare Function ～　lib "kernel32"」とかって書くってこと。

CAD関係のカスタマイズやマクロなんかを
いじったりすることが多いんですが、
dll作ってもVCとかC#のほうが多いかもしんないっす。

自分の場合、社内でのシステムや部署内、グループ内で完結する
プログラムが多く、社外（対顧客）に対しての開発が
少ないというのがメリットかもしれません。

納期とかも最悪延びても大丈夫だし＾＾


弟も開発系の仕事してますが、
企業向けにフルカスタマイズするとかするとなると
アプリケーション開発も大変なようです。。

定時帰りの日がある俺なんか幸せもんかも＾＾

スポンサードリンク

2008/03/06 (Thu) VB