Thread View: cn.bbs.comp.program
1 messages
1 total messages
Started by ���ܵ�Сʨ
Sat, 18 Apr 1998 00:00
��PowerBuilder 4.0��Oracle 7.2 ����"�ļ�����ϵͳ.
Author: ���ܵ�Сʨ
Date: Sat, 18 Apr 1998 00:00
Date: Sat, 18 Apr 1998 00:00
119 lines
7316 bytes
7316 bytes
����������"�ļ�����ϵͳ"������ܶ�,������ʹ�û��Ƚ������
�������Ҫ�������û���Ҫ��,ֻ���Լ�������������,���ⷽ�湤
���ѶȽϴ�,һ����Ҫ�������н�ǿ�����ִ�������,��һ������
Ҫѡ���ʵ��ġ�������Խ����ݿ�,��Ҫ�зḻ�Ŀ������顣������
���˴����ķ���֮��,������PowerBulder4.0����������,��ݿ���Or
acle7.2,����"�ļ�����ϵͳ"���ֽ�һЩ����ܽ����,��ͬ���Dz�
����
ϵͳ����
��ϵͳ�����˵������е�Client/Server�ṹ,Server��ΪUNIX��
��ϵͳ��Oracle7.2��ݿ�,ǰ�˿���ƽ̨��Windows 3.1��Windows95
,����Э����TCP/IP����������ΪAlpha8200 ,Client�˿�����HUB��R
outer��Զ���ն�,ͨ��FTP��SQL*NET V1 TCP/IP(��SQL*NET V2)��NF
Sֱ�Ӵ�LAN��WAN�϶�ȡ�ʹ����ļ�����"�ļ�����ϵͳ"�����ļ�ά
�����ļ���ѯ�����֡�
"�ļ�ά������"�����ļ���¼�롢�ַ��������ճ�ά������,ȫ
��¼����PowerBuilder 4.0��MLE(���б༭��)��Ϊ�༭��,�༭���
�����ORACLE��LONG�ֶ��С�"�ļ���ѯ����" ��ʵ�ְ����������
�����в�ѯ,����Ȼ�����ʵȡ��ļ��Ĵ��?�ͷ���ͳ�Ʊ����ϵ
ͳ�е���Excel,ͨ��������Ӻ��������Ļ���ӡ��
�����ѵ㼰����ķ���
1.�����ļ�������,���ά��Ч�ʡ�
��Ϊ��ϵͳ�漰����������ֶ��һ���Ե�����,�����ڸ�ʽ��
�ŵȷ������Ĺ���Ҫ���ϸ�¡�����˵,Windows�µı༭������һ��
��ͬ��,ֻҪ�����س����з�,���о������Ͽ�������һЩ����ļ���
���û��⡢����WPS���Ű�����༭���,�������ֱ�ӽ������,
�ڵ���MLE�༭��ʱ�ͻ�����߳��˶̡�������ƪ������,������Ϊ��
�����лس����з��һЩ�Ű��ŵ�,������MLE���Ų���,�����ֺ�
�˷�ʱ�䡣��ʲô�õĽ��������?�ش���:���ļ���Oracle��֮ǰ,
���Զ���Ԥ���?����������"�Ƿ�"�ַ���˵������"�Ƿ�"�ַ���
�س����з��"&",���������г�����ȥ��:
long i,j.s,f1,f2
blob text1,text2
int fp
string article
f1=fileopen("c:"wj.txt",streammode!)
fileread(f1,text)
fileclose(f1)
mle_1.text=string(text)
article=mle_1.text
s=len(article)
for i=1 to s
j=pos(article,char(13),i)
if j>0 then
article=replace(article,j,1,"")
else
end if
next
s=len(article)
for i=1 to s
j=pos(article,"&",i)
if j>0 then
article=replace(article,j,1,"")
else
end if
next
f2=fileopen("c:"wjnew.txt",streammode!,write!,lock-write
!,replace!)
if f2<>-1 then
filewrite(f2,text2)
fileclose(f2)
end if
mle_1.text=article
�����ĺ�,���������:
text2=blob(mle_1.text)
insert into wj_tab(�ֶ���)values(�ֶ�ֵ)using sqlca;
commit;
updateblob wj_tab set text=:text2 where <����> using sql
ca;
commit;
2.��ȡ���ܴ�ʩ,ʵ�ְ�Ȩ��ѯ��
���û���˵,�����ļ�����Ȩ��,���Ǹ���ʶ�Ե����⡣�ڽ���
"�ļ���ѯ"ϵͳʱ,����ȷ�ؼ�������,�û�ֻ�ܲ鵽"��������ļ�"
�����ͬһ̨��,˭����ȷ�ؼ�������,˭��������ѯ,��ֻ�ܲ鵽"
�Լ���"�ļ�,�ﵽ�˱���Ҫ��
3.�����м����ؼ��,�������ȫ�ġ�
�������г���ʵ��(����һ������):
fn=fileopen(named,streammode!)
if fn>0 then
fileread(fn,text1)
fileclose(fn)
mle_1.text=string(text1)
article=mle_1.text
j=pos(article,"���")
if j>0 then
bb=mid(article,j+5,5)
sle_1.text=bb
bh1=long(bb)
else
end if
j=pos(article,"����")
if j>0 then
zz=mid(article,j+5,6)
sle_5.text=zz
else
end if
4.����MLE�༭����ʱ,���ֹ���λ������,����"����֮��"��
�����"������"����,�ɽ���������⡣
5.��ϵͳ���й����,����"ȱ��һЩDLL�⺯��"�Ĵ�����ʾ,��
����������ķ�����:���������Ŀ⺯���Ƴ�"ȱ�ٵĿ⺯��"��
6.�� ��ʹ�ô��ڼ̳кͶ�̬��ݴ���,�������ظ����Ͷ�,���
�˱��Ч�ʡ�
�������ߵ�ȱ��PowerBuilder4.0�Ķ��б༭��MLEֻ�ܱ༭С��
32K���ļ�,��������˶�32K���ϴ��ı��ļ��������,����Щ�ļ�
�Ĺ��?Ҫ������������ֲ��������,���ǿ������ߵ�һ��ȱ��
�����ߺ�ϣ��Power Soft��˾�����ⷽ����Щ����,�����һ���⡣
�������ߵ�ȱ��
PowerBuilder 4.0�Ķ��б༭��MLEֻ�ܱ༭С��32K���ļ�, ��
�������˶�32K���ϵĴ��ı��ļ��������, ����Щ�ļ��Ĺ��?
Ҫ������������ֲ��������, ���ǿ������ߵ�һ��ȱ�ݡ����ߺ�
ϣ��Power Soft��˾�����ⷽ����Щ����, �����һ���⡣
--
[m[1;32m�� ��Դ:���ϴ�С�ٺ���Ϣ����վ bbs.nju.edu.cn��[FROM: hsia.nju.edu.cn][m
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