タイトル | : VB6 SQL2005 |
記事No | : 12848 |
投稿日 | : 2008/07/31(Thu) 16:14 |
投稿者 | : 來 |
いつも勉強させていただいてます。
VB6でSQL2005に接続しています。 JOINするコードが空白の時、EOFになってしまいます。 同じPGと同じデータで SQL2000の場合は、EOFではなく レコードが返ってくるですが、 SQL2000とSQL2005の違いは何かあるのでしょうか?
PGは下記になります
宜しくお願いします。
DIM CN As New ADODB.Connection DIM strSQL AS String DIM NOU AS New ADODB.ADODB.Recordset
strSQL = "Driver={SQL Server};Server=" & SvPath strSQL = strSQL & ";Uid=" & UserID strSQL = strSQL & ";Pwd=" & PsWord strSQL = strSQL & ";Database=" & DBName & ";OLE DB Services=-4" CN.ConnectionString = strSQL CN.Open
strSQL = "SELECT NOU.*,TOKNAME" strSQL = strSQL & " FROM M_NOUNYU NOU" strSQL = strSQL & " LEFT JOIN (SELECT TOKCODE,TOKNAME FROM M_TOKUI) TOK" strSQL = strSQL & " ON NOU.TOKCODE = TOK.TOKCODE" strSQL = strSQL & " WHERE NOU.DFLG = 0 AND NOUCODE = '" & TxtNOUCode & "'" NOU.Open strSQL, CN, adOpenKeyset, adLockPessimistic
|