JRA公式競馬データ配信サービス JRA-VAN Data Lab.

JRA-VAN DataLab.

競馬ソフト開発コーナー

プログラミング質問広場

本掲示板は、プログラミングに関する情報を作者様同士で共有・議論していただく場として用意いたしました。
JV-Link、JV-Dataに直接関連しない(一般論としてのプログラミング方法やAPI・メソッドの利用法などの)スレッドはこちらに立ててください。

一括表示 リストに戻る
タイトル払戻金情報が取得できません。
記事No684
投稿日: 2013/10/31(Thu) 20:18
投稿者ナリタブライアン
EXCELで速報系データの払戻金情報を取得したいのですがうまくいきません。
初心者ですが、O1、O2のオッズデータを取得することはできている程度です。
RAは取得できているのに
払い戻し(HR)は取得できません。
どなたかよろしくお願いします。


dataspec = "0B12" '速報レース情報。 
Key = Range("A1") '201310270402 とかはいっています。
          '開催日単位ですが、レース単位でもよい

Ret = JVLink1.JVRTOpen(dataspec, Key)

'■■■ダウンロードチェック
If Ret = 0 Then
Me.lbl1.Caption = Me.lbl1.Caption & vbCrLf & "ダウ
ンロード完了"
Call GetJVData

Else
Me.lbl1.Caption = Me.lbl1.Caption & vbCrLf & "ダウ
ンロード失敗"
End If

・・・なんて感じで進んで行って

ID = Left(buf, 2)

Select Case ID
Case "O1"
Call TorokuTanAsa(buf)
Case "O2"
Call TorokuUmarenAsa(buf)
Case "HR"
call なんとか

Case Else
JVLink1.JVSkip
End Select

タイトルRe: 払戻金情報が取得できません。
記事No700
投稿日: 2013/11/11(Mon) 19:23
投稿者ナリタブライアン
自己レスです。

繰り返し処理ができていませんでした。
ぐりぐりやってたらできるようになりました。
どうもお騒がせしました<m(__)m>

ウィンドウを閉じる