承接一个程控电话计费的软件，如购买得多少钱？也就是读取程控机上的数据。哪有资料？？？ (50分)

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #1

如果有现成的源码，能发我一份吗？
如要购买的话，这样的软件需要多少钱
比较急！！！！！
zzprogram@21cn.com

 

B

barton

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #2

偶十年前做过DOS版的。你要可以免费相送。
Windows版本的自己写一个三天够了吧？

 

低

低调一贱男

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #3

什么接口，直接不可以读吗，有没有指令集

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #4

To：barton
这方面没做过，你有相关的资料吗？

 

B

barton

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #5

资料全在你自己的手上。我做过三种交换机：
加拿大北方电讯产(局级交换机)
原邮电部洛阳定点厂产(用户交换机)
珠海产(用户交换机)
1.一般交换机都有输出格式说明书
2.如果没有或丢失，随便找个COM口工具一调便知
3.一点关键技术：如何快速地从话单中寻找主叫号和被叫号(包括分析被叫话务种类)，基于
主叫及被叫都是数字这个事实(也有主叫不是数字的，但很少可作为特例处理)

 

C

cpjin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #6

500元，给你一个现成的吧，windows版

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #7

To:cpjin
源码多少钱？
有QQ吗？
我的QQ:69407253 上来详谈

 

K

kkyy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #8

源码2000，我出售，呵呵，

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #9

看来源码很贵呀
我买不起

 

Z

zhuoyuesky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #10

一般都要有说明文档的。com通信，自己做吧。

 

H

HappyBug

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #11

我有，[]
可按交换机com口输出的格式自定义主叫被叫，
可留个E-mail发份试用版给你
开个价吧[]

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #12

To:HappyBug
是通用的吗？
请发到 zzprogram@21cn.com

 

C

cpjin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-15

• #13

500元给你全部原代码，qq4441076

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-16

• #14

barton 大哥：
用TSPComm控件接收串口数据，没有时间看它的源码了，我知道接收数据时在 OnReceiveData 写代码，但我看到的代码都是类似于这样的：
procedure TFcomm.Comm1ReceiveData(Sender: TObject;
Buffer: Pointer;
BufferLength: Word);
var
i:integer;

viewstring:string;

rbuf,sbuf:array[1..16] of byte;
begin
viewstring:='';
move(buffer^,pchar(@rbuf)^,bufferlength);
//将接收数据赋给rbuf变量
for i:=1 to bufferlengthdo
viewstring:=viewstring+inttohex(rbuf,2)+'';
viewstring:='接收'+ viewstring;
memo1.lines.add(viewstring);
memo1.lines.add('');
end;

我想问的是：如果接收程控电话交换机上的数据，在这个事件里做数据库的操作(如insert)，估计会占用相当多的时间，这样的话SPComm控件是否会丢失数据？

 

B

barton

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-16

• #15

1.操作数据库一般不会丢数据，系统有一定容量的缓冲区。不过我建议你还是自己搞一套缓
冲体系。例如建立一个足够大的队列，并将数据库操作放到线程中响应队列消息并通过线
程的同步方法实现。
2.尽可能提高操作效率。例如我上面说的第三点。
3.你的代码问题非常严重。如果是我，我会这么写：
procedure TFcomm.Comm1ReceiveData(Sender: TObject;
Buffer: Pointer;
BufferLength: Word);
var
I: Integer;
S1, S2:string;

begin
SetString(S1, Buffer, BufferLength);
for I := 1 to BufferLengthdo
S2 := S2 + IntToStr(Ord(S1)) + ' ';
memo1.lines.add(Format(''接收%d字节:%s'#13#10, [BufferLength, S2]);
end;

 

P

pcsunflower

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-16

• #16

to barton:
有没有北电交换机CDR文件的详细格式说明资料

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-17

• #17

barton 大哥：
S2 := S2 + IntToStr(Ord(S1)) + ' ';
从交换机上提取的是字符串，为什么要Ord成int类型再转成字串呀，真接：
S2 := S2 +S1+ ' ';
不行吗？？

 

B

barton

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-17

• #18

错了，应该是IntToHex。笔误，笔误！
这是按照你原先的程序写的。我认为你想看16进制代码。

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-17

• #19

现在客户那边的程控机资料还没给我，他们让我在接到资料开始7、8天就得有搞定。
这两天能做点什么？？

 

林

林枫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-07-17

• #20

barton 大哥：
能给我一些程控机上的输出数据和格式吗？
我想先写一些数据分析的代码，可能以后要改的，但还是先写点好
有没有电信的时间段收费表？
多费心