Please start any new threads on our new
site at https://forums.sqlteam.com. We've got lots of great SQL Server
experts to answer whatever question you can come up with.
| Author |
Topic |
|
AskSQLTeam
Ask SQLTeam Question
0 Posts |
 Posted - 2005-03-23 : 07:25:08
|
| Ahmed writes "how to connect a vb 6.0 to a sql server 2000 data base and please help me as much as you can and thank you....ahmed from jordan" |
|
|
spirit1
Cybernetic Yak Master
11752 Posts |
Posted - 2005-03-23 : 07:28:43
|
well MSDN and ADO are your best friends. read about Connection, Command and Recordset objects.use stored procedures for data access.Go with the flow & have fun! Else fight the flow  |
 |
|
|
kprasadreddy
Starting Member
41 Posts |
Posted - 2005-03-23 : 10:39:00
|
| sample... Dim DBConn As New ADODB.Connection DBConn.Open "DSN=XXXXXXXX;UID=xxxx;PWD=XXXX;" Dim rsTrack As New ADODB.Recordset 'Create Track Recordset Dim StrCrrclm As String 'Variable to hold Crrclm StrCrrclm = CmbCrrclm.Text 'rsTrack.Open "Select DISTINCT LD075.CRRCLM_TRACK_CD LD894.CRRCLM_TRACK_CD_DS FROM ZLDT075_CRRCLM_CRS LD075 INNER JOIN ZLDT894_TRACK_CD LD894 ON LD075.CRRCLM_TRACK_CD = LD894.CRRCLM_TRACK_CD where LD075.CORE_BUS_AREA_CD = 2 and LD020.CRRCLRRCLM_TRACK_CD_DS = " & CStrCrrclm & " order by LD075.CRRCLM_TRACK_CD ", DBConn, adOpenForwardOnly, adLockReadOnly rsTrack.Open "Select DISTINCT LD075.CRRCLM_TRACK_CD,LD894.CRRCLM_TRACK_CD_DS FROM ZLDT075_CRRCLM_CRS LD075 INNER JOIN ZLDT894_TRACK_CD LD894 ON LD075.CRRCLM_TRACK_CD = LD894.CRRCLM_TRACK_CD inner join ZLDT020_CRRCLM LD020 ON LD075.CRRCLM_CD = LD020.CRRCLM_CD where LD075.CORE_BUS_AREA_CD = 2 and LD020.CRRCLM_CD_DS = '" & StrCrrclm & "' order by LD075.CRRCLM_TRACK_CD", DBConn, adOpenForwardOnly, adLockReadOnly While Not rsTrack.EOF CmbTrack.AddItem rsTrack("CRRCLM_TRACK_CD_DS") rsTrack.MoveNext Wend rsTrack.Close Set rsTrack = Nothing DBConn.Close Set DBConn = Nothing |
|
|
|
|
|
|
I want some help