🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: fj.lang.visualbasic
1 messages
1 total messages Started by T.Nosaka Mon, 02 Mar 1998 00:00
CrystalReportOCX�R���g���[���̃\�[�g�@�\
#475
Author: T.Nosaka
Date: Mon, 02 Mar 1998 00:00
34 lines
2007 bytes

�@Oracle R7.3���x�[�X�Ƃ��āACrystalReport���A�f�[�^��
�o�͂���v���O�������쐬�����̂ł����AVB�R�[�h�ɖ��ߍ�
�񂾃\�[�g��񂪁A���|�[�g�ɔ��f����Ȃ��̂ł����A�ǂȂ�
�������Ă��������Ȃ��ł��傤���B

�R���p�C���́AVisualBasic Ver4.0 �ł��B
CrystalReport�ւ́AOCX�R���g���[�����g�p���Ă��܂��B
CrystalReport�́AVer4.5J ��VB�Y�t�o�[�W�����̂ǂ����
���A������悤�Ȃ̂ł����B

�\�[�X�R�[�h�́A�ȉ��ł��B

    PassWord = "ODBC;DSN=" & DSN & ";UID=" & UID & ";PWD=" & PWD
    FileName = AddDir(GetCurrentPath) & "TESTRESULT.RPT"

    crpTestReqc.SortFields(0) = "+{TEST_SHEET_VIEW.GN}"
    crpTestReqc.SortFields(1) = "+{TEST_SHEET_VIEW.CYCLE}"
    crpTestReqc.SortFields(2) = "+{TEST_SHEET_VIEW.CELL_NO}"
    
    crpTestReqc.Connect = PassWord
    crpTestReqc.ReportFileName = FileName
    crpTestReqc.Action = 1


----------------------------------------------
�i���j�I�H�R���s���[�^�[�Y�@��㎖�Ə�
�����F�\�t�g�E�F�A�Z�p��񕔁@���ʐM�V�X�e����
�����F���@�@�h
Tel.06-364-8335 Fax.06-365-9628
mail:nosaka@ritsuryo.co.jp
Http://www.ritsuryo.co.jp
----------------------------------------------
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads