山寨机中的战斗机！	程序优化工程师到底对IT界有没有贡献

收集你收藏的资料

楼主ehxz（郝晓宗）2003-01-10 10:14:33 在 PowerBuilder / 基础类提问

要求有问有答，如：
Q：如何用DOS下的FTP命令与服务器进行文件上传、下载？
A：
1、建立一个批处理文件如下：ftpdemo.bat
ftp -s:c:\ftp.txt 127.0.0.1
2、建立文件ftp.txt在相关路径下
username
password
……
bye
//////////////////完成
说明：第一行为FTP用户名，第二行为FTP密码
后面部分可输入在FTP上的操作。
附FTP的使用说明（英文）
Transfers files to and from a computer running an FTP server service
(sometimes called a daemon). Ftp can be used interactively.

FTP [-v] [-d] [-i] [-n] [-g] [-s:filename] [-a] [-w:windowsize] [-A] [host]

-v Suppresses display of remote server responses.
-n Suppresses auto-login upon initial connection.
-i Turns off interactive prompting during multiple file
transfers.
-d Enables debugging.
-g Disables filename globbing (see GLOB command).
-s:filename Specifies a text file containing FTP commands; the
commands will automatically run after FTP starts.
-a Use any local interface when binding data connection.
-A login as anonymous.
-w:buffersize Overrides the default transfer buffer size of 4096.
host Specifies the host name or IP address of the remote
host to connect to.

Notes:
- mget and mput commands take y/n/q for yes/no/quit.
- Use Control-C to abort commands.

谢谢大家支持，有什么好的东西请与大家共享。谢绝灌水！问题点数：100、回复次数：18Top

1 楼ldy（罗大佑）回复于 2003-01-10 10:24:06 得分 10

好啊Top

2 楼bomber2001（沧海飘舟）回复于 2003-01-10 10:45:30 得分 10

收藏Top

3 楼ehxz（郝晓宗）回复于 2003-01-11 09:32:14 得分 0

谢谢楼上二位支持，有没有啊也来一个让大家学学！
谢谢！Top

4 楼pbcoder（www.itheroes.cn）回复于 2003-01-11 10:32:33 得分 10

up，不错，楼主的精神让人感动，已经将楼主的文章加到www.pbcoder.com/bbs中。Top

5 楼flyhot（阳光清晨）回复于 2003-01-11 10:46:59 得分 10

gzTop

6 楼ehxz（郝晓宗）回复于 2003-01-19 13:04:15 得分 0

没有人了？Top

7 楼ldy（罗大佑）回复于 2003-01-19 13:30:58 得分 10

ME再来顶Top

8 楼tripman（牛愤︱9# dream）回复于 2003-01-19 13:46:55 得分 10

问：SOS 怎样在一个程序中连接两个数据库？数据库在两台机器中，一个是SQL6.5，一个是SQL7.0。
答：
你可以这么做
Transaction mytrans1,mytrans2
mytrans1=Create Transaction
mytrans2=Create Transaction
mytrans1.DBMS="驱动程序类型"
mytrans1.DBParm="这里填连接Sql6.5的字串"
mytrans2.DBMS="驱动程序类型"
mytrans1.DBParm="这里填连接Sql7.0的字串"
connect using mytrans1;
connect using mytrans2;
剩下的你知道该怎么做了？

eg:
Transaction mytrans1,mytrans2
mytrans1=Create Transaction
mytrans2=Create Transaction
mytrans1.DBMS = "ODBC"
mytrans1.AutoCommit = False
mytrans1.DBParm = "ConnectString='DSN=YourDsnforSql6.5DB'"
connect using mytrans1;
IF mytrans1.sqlcode = -1 THEN
Messagebox("",Yourmessage)
disconnect using mytrans1;
halt
end if

mytrans2.DBMS = "ODBC"
mytrans2.AutoCommit = False
mytrans2.DBParm = "ConnectString='DSN=YourDsnforSql7.0DB'"
connect using mytrans2;
IF mytrans2.sqlcode = -1 THEN
Messagebox("",Yourmessage)
disconnect using mytrans2;
halt
end if

//If t65 is a table in your sql6.5 Database,t70 is a table in your sql7.0 Database and
//dw_1 and dw_2 are DataWindow Control ,dwo_sql65 and dwo_sql70 are respectedly DataWindow Object
//for t65 and t70 then
dw_1.dataobject="dwo_sql65"
dw_1.settransobject(mytrans1)
dw_1.retrieve()//It is best to test error
dw_2.dataobject="dwo_sql70"
dw_2.settransobject(mytrans2)
dw_2.retrieve()//It's the same as above
//Then ,you can manipulate the data by dw_1 and dw_2
//Do you understand?
Top

9 楼tripman（牛愤︱9# dream）回复于 2003-01-19 13:48:41 得分 10

Sybase SQL Anywhere 5.0数据库的备分与恢复？

问：我用的是SQL ANYWHERE 5.0建库的，请问实现数据备份和恢复时的具体步骤和实现方法是怎样的？请写出具体的程序代码，多谢！
答：lysoftware
备份:
安装sql anywhere后，在sql anywhere5.0\win32\ 目录中可以找到dbbackup.exe。再在ms-dos方式下用命令dbbackup /?或者在sql anywhere中的帮助下查看其命令开关. 如:dbbackup -c "eng=dbname,uid=dba,pwd=sql" -d c:\ ,在pb中用run函数运行即可。
恢复:
我用的是在pb中用run("copy %1 %2")。

yiyi：
如果是sql anywhere数据库，可以在程序中调用dbbackup命令实现；如果是SQL SERVER等数据库，则应在服务器端中备份。

Top

10 楼tripman（牛愤︱9# dream）回复于 2003-01-19 13:49:43 得分 10

动态SQL四种类型的语句格式

问：各位仁兄,由于小妹既健忘又慷慨(把自已卖的PB书全借出去了),以至用到动态SQL时,四种类型的语句竟是一句也记不起一句也找不到,在HELP里转了半天也无所获,不知哪位好心人,能速告知,将不盛感激.谢谢
答：

1.Dynamic SQL Format 1

EXECUTE IMMEDIATE SQLStatement {USING TransactionObject} ;

eg:
string Mysql
Mysql = "CREATE TABLE Employee "&
+"(emp_id integer not null,"&
+"dept_id integer not null, "&
+"emp_fname char(10) not null, "&
+"emp_lname char(20) not null)"
EXECUTE IMMEDIATE :Mysql ;

2.Dynamic SQL Format 2

PREPARE DynamicStagingArea FROM SQLStatement {USING TransactionObject} ;
EXECUTE DynamicStagingArea USING {ParameterList} ;

eg:
INT Emp_id_var = 56
PREPARE SQLSA
FROM "DELETE FROM employee WHERE emp_id=?" ;
EXECUTE SQLSA USING :Emp_id_var ;

3.Dynamic SQL Format 3

DECLARE Cursor | Procedure DYNAMIC CURSOR | PROCEDURE FOR DynamicStagingArea ;
PREPARE DynamicStagingArea FROM SQLStatement {USING TransactionObject} ;
OPEN DYNAMIC Cursor {USING ParameterList} ;
EXECUTE DYNAMIC Procedure {USING ParameterList} ;
FETCH Cursor | Procedure INTO HostVariableList ;
CLOSE Cursor | Procedure ;
eg:
integer Emp_id_var

DECLARE my_cursor DYNAMIC CURSOR FOR SQLSA ;
PREPARE SQLSA FROM "SELECT emp_id FROM employee" ;
OPEN DYNAMIC my_cursor ;
FETCH my_cursor INTO :Emp_id_var ;
CLOSE my_cursor ;

4.Dynamic SQL Format 4

DECLARE Cursor | Procedure DYNAMIC CURSOR | PROCEDURE FOR DynamicStagingArea ;
PREPARE DynamicStagingArea FROM SQLStatement {USING TransactionObject} ;
DESCRIBE DynamicStagingArea INTO DynamicDescriptionArea ;
OPEN DYNAMIC Cursor | Procedure USING DESCRIPTOR DynamicDescriptionArea ;
EXECUTE DYNAMIC Cursor | Procedure USING DESCRIPTOR DynamicDescriptionArea ;
FETCH Cursor | Procedure USING DESCRIPTOR DynamicDescriptionArea ;
CLOSE Cursor | Procedure ;

eg:

string Stringvar, Sqlstatement
integer Intvar
Sqlstatement = "SELECT emp_id FROM employee"
PREPARE SQLSA FROM :Sqlstatement ;
DESCRIBE SQLSA INTO SQLDA ;
DECLARE my_cursor DYNAMIC CURSOR FOR SQLSA ;
OPEN DYNAMIC my_cursor USING DESCRIPTOR SQLDA ;
FETCH my_cursor USING DESCRIPTOR SQLDA ;

// If the FETCH is successful, the output
// descriptor array will contain returned
// values from the first row of the result set.
// SQLDA.NumOutputs contains the number of
// output descriptors.
// The SQLDA.OutParmType array will contain
// NumOutput entries and each entry will contain
// an value of the enumerated data type ParmType
// (such as TypeInteger!, or TypeString!).

CHOOSE CASE SQLDA.OutParmType[1]
CASE TypeString!
Stringvar = GetDynamicString(SQLDA, 1)
CASE TypeInteger!
Intvar = GetDynamicNumber(SQLDA, 1)

END CHOOSE
CLOSE my_cursor ;

Top

11 楼qianjia（进修者）回复于 2003-01-20 10:25:26 得分 5

Sybase SQL Anywhere 5.0数据库的备份最简单的方法把数据文件.db复制一份出来即可备份，恢复嘛，把复制出来的.db替换在使用的就可以Top

12 楼jjweid（Odi）回复于 2003-01-20 10:36:10 得分 5

网易社区雷老虎的pb知识库很好
有兴趣的朋友可以在他的主页http://leitiger.1000box.net/ 找到~~Top

13 楼ehxz（郝晓宗）回复于 2003-01-27 13:44:32 得分 0

过年了~~大家都发表一下啊！Top

14 楼ehxz（郝晓宗）回复于 2003-02-12 19:12:10 得分 0

Q:在用PB时常常需要把一些报表的数据导出，但一般导成TXT或EXCEL的格式，跟我们原来的样子变化很大，特别是表头部分。

A：但如果在报表导出时选择“html table”，可以被存成扩展名为htm的文件，我们如果用IE打开，可以看到文件内容与格式与原来变化不大，但如果用EXCEL打开，会看到格式变化了，这时我们可以用“记事本”打开，然后替换“<tr><td”成“<td”、替换“<tr><th”成“<th”，保存后再用EXCEL打开，一般就可以得要我们想要的结果。

注：如果是交叉报表，可能表头表尾等部分仍会不是很理想，希望大家有什么更好的办法提出来。
Top

15 楼flyerlxg（飞鸟）回复于 2003-02-12 19:17:49 得分 5

不错，尽是精华所在，学习先！Top

16 楼ehxz（郝晓宗）回复于 2003-03-10 19:43:38 得分 0

有没有人再来点啊！！Top

17 楼ehxz（郝晓宗）回复于 2003-04-06 12:11:15 得分 0

顶一下!Top

18 楼shahand（死磕）回复于 2003-04-06 12:19:53 得分 5

www.google.comTop