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

JRA-VAN DataLab.

競馬ソフト開発コーナー

プログラミング質問広場

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

一括表示 リストに戻る
タイトルエクセル2007
記事No198
投稿日: 2010/05/22(Sat) 17:27
投稿者Haku Masaki
エクセル2000で自作ソフトを作って問題なく動いていましたが、エクセル2007に
したところ
速報データがとれません。どのような原因が考えられるでしょうか。
具体的には JVLink1.JVRTOpenがだめで JVLink1.JVOpenは大丈夫です。
下記に JVLink1.JVRTOpenのところのコードだけ書きました、よろしくお願いし
ます。( 変数sizeにマイナス503が入ってきます )

  code = "0B11"
key = yymmdd ’6桁の日付
ret = JVLink1.JVRTOpen(code, key)

If ret = 0 Then
Do
size = JVLink1.JVRead(buf, 60000, filename)

by = StrConv(buf, vbFromUnicode)
code = byte2str(by, 1, 2)
hbasyo = byte2str(by, 20, 2)
hrace = byte2str(by, 26, 2)

If hbasyo = Basyo And hrace = Race And code = "WH&
quot; Then
L_fl = 1
Call hweight(by) '馬体重
Exit Do
Else
hbasyo = 0
hrace = 0
End If
Loop Until size = 0

タイトルRe: エクセル2007
記事No200
投稿日: 2010/07/09(Fri) 11:39
投稿者JRA-VANソフトサポート
JRA-VANソフトサポートの吉田です。

回答が遅くなり申し訳ございません。

> エクセル2000で自作ソフトを作って問題なく動いていましたが、エクセル2007に
> したところ
> 速報データがとれません。どのような原因が考えられるでしょか。
> 具体的には JVLink1.JVRTOpenがだめで JVLink1.JVOpenは大丈夫です。
> 下記に JVLink1.JVRTOpenのところのコードだけ書きました、よろしくお願いし
> ます。( 変数sizeにマイナス503が入ってきます )

「-503」が返ってきておりますので、「ファイルがみつからない」状態だと考えられます。
(エラーの詳細につきましては、JV-Link仕様書をご覧ください。)
従いまして、ファイルが取得できていることをご確認いただけますでしょうか。

またJVRTOpenメソッドの第2パラメータ(key)は、開催日単位の場合は8桁の日付を、
レース毎の場合は、8桁の日付+場コード+回次+日次+レース番号(回次、日次は省略可)を指定する必要がございます。
ご提示いただきましたコードを拝見しますと、6桁の日付を指定しているように見受けられます。
こちらも合わせてご確認いただければと存じます。

以上、よろしくお願いいたします。

ウィンドウを閉じる