紧急求助!!关于SetProfileString()的问题

时间:2021-08-18 10:42:45
本人已经成功用ProfileString函数完成了对配置文件Info.ini文件的读取
SQLCA.DBMS = ProfileString("Info.ini","Database","DBMS","")
SQLCA.DbParm = ProfileString("Info.ini","Database","DbParm","")

但想对Info.ini文件用SetProfileString()函数进行修改,代码如下:
SQLCA.DBMS = SetProfileString("Info.ini","Database","DBMS","")
最后一个参数无论怎么设,都出现这个问题:
incompatible types in assignment:string, integer

Info.ini代码如下:
[Window]
WindowState=Normal!
Width=2642
Height=1476

[DataBase]
DBMS=ODBC
DbParm=ConnectString='DSN=IELTS;UID=;PWD='
AutoCommit=Ture

小弟都快被这个问题整疯了。。求大神帮忙啊

5 个解决方案

#1


这个函数是这样用的:


SetProfileString("Info.ini","Database","DBMS",SQLCA.DBMS)

#2


真心谢谢啦。。果然可以了。。 紧急求助!!关于SetProfileString()的问题
话说还有一个问题,解决了我马上就加分,
我想将配置文件中的UID和PWD放在文本框中,这样可以在程序运行时将两个内容输进文本框然后在修改配置文件,代码如下:
SQLCA.DbParm="ConnectString='DSN=IELTS;UID='+sle_1.text+';PWD='+sle_2.text+''"
但是最后的结果是UID改为了'+sle_1.text+',PWD改为了'+sle_2.text+',变量完全没用上、

#3


"老板,杀头牛,10000块我买了"
老板杀完......
"10000块我觉得贵了,要不你送只羊,我立刻给钱"

------------------

每年找我买程序的,总有几个人这样。

写程序前讲价的,我会心平气和地告诉他为什么没法降。

写程序后再讲的,讲1000我就涨1000.

------------------

我每年总有几天甚至几十天白做的.

坚决不给杀完牛讲价的人任何机会。

这是人品问题。

立此为照,后面人不用回贴了。

#4


我承认,昨天的事完全是我的错,的确不应该这样言而无信,100分按照承诺全给你,昨天确实是一时着急没过脑子,着实是无意的。但还是感谢你回答了我的问题,更用这么多篇幅给我上了一课,真心谢谢!可能因为我还是学生,还没走入社会,有些时候为人处事上还是有问题,望您还是谅解,像昨天那样做的确会给人一种RP不好的感觉,虽然我也承认有些地方的确需要改正。

#5


引用 4 楼 u013358482 的回复:
我承认,昨天的事完全是我的错,的确不应该这样言而无信,100分按照承诺全给你,昨天确实是一时着急没过脑子,着实是无意的。但还是感谢你回答了我的问题,更用这么多篇幅给我上了一课,真心谢谢!可能因为我还是学生,还没走入社会,有些时候为人处事上还是有问题,望您还是谅解,像昨天那样做的确会给人一种RP不好的感觉,虽然我也承认有些地方的确需要改正。


//我相信你不是故意的.
其实我也太暴躁了,因为前几天,刚好有个人等我做完了再讲价。
如果我放弃人家议价的1000块,可以减少几千块的损失("5000我现在觉得多了,4000成交?要不然你这两天白做,一块钱都收不到")
单独的这一笔,我可能没办法要让步以减少损失,可是,这次可以降1000,下次我是不是也可以降2000?再下次呢?
长远地看,随便让步,损失的还是自己。如果整个行业有很多人愿意做坏这个市场,那是降低了整个行业议价的筹码。


另外,你把 sle_1.text 和 sle_2.text两边的单引号改为双引号就可以了。留意引号要匹配。

#1


这个函数是这样用的:


SetProfileString("Info.ini","Database","DBMS",SQLCA.DBMS)

#2


真心谢谢啦。。果然可以了。。 紧急求助!!关于SetProfileString()的问题
话说还有一个问题,解决了我马上就加分,
我想将配置文件中的UID和PWD放在文本框中,这样可以在程序运行时将两个内容输进文本框然后在修改配置文件,代码如下:
SQLCA.DbParm="ConnectString='DSN=IELTS;UID='+sle_1.text+';PWD='+sle_2.text+''"
但是最后的结果是UID改为了'+sle_1.text+',PWD改为了'+sle_2.text+',变量完全没用上、

#3


"老板,杀头牛,10000块我买了"
老板杀完......
"10000块我觉得贵了,要不你送只羊,我立刻给钱"

------------------

每年找我买程序的,总有几个人这样。

写程序前讲价的,我会心平气和地告诉他为什么没法降。

写程序后再讲的,讲1000我就涨1000.

------------------

我每年总有几天甚至几十天白做的.

坚决不给杀完牛讲价的人任何机会。

这是人品问题。

立此为照,后面人不用回贴了。

#4


我承认,昨天的事完全是我的错,的确不应该这样言而无信,100分按照承诺全给你,昨天确实是一时着急没过脑子,着实是无意的。但还是感谢你回答了我的问题,更用这么多篇幅给我上了一课,真心谢谢!可能因为我还是学生,还没走入社会,有些时候为人处事上还是有问题,望您还是谅解,像昨天那样做的确会给人一种RP不好的感觉,虽然我也承认有些地方的确需要改正。

#5


引用 4 楼 u013358482 的回复:
我承认,昨天的事完全是我的错,的确不应该这样言而无信,100分按照承诺全给你,昨天确实是一时着急没过脑子,着实是无意的。但还是感谢你回答了我的问题,更用这么多篇幅给我上了一课,真心谢谢!可能因为我还是学生,还没走入社会,有些时候为人处事上还是有问题,望您还是谅解,像昨天那样做的确会给人一种RP不好的感觉,虽然我也承认有些地方的确需要改正。


//我相信你不是故意的.
其实我也太暴躁了,因为前几天,刚好有个人等我做完了再讲价。
如果我放弃人家议价的1000块,可以减少几千块的损失("5000我现在觉得多了,4000成交?要不然你这两天白做,一块钱都收不到")
单独的这一笔,我可能没办法要让步以减少损失,可是,这次可以降1000,下次我是不是也可以降2000?再下次呢?
长远地看,随便让步,损失的还是自己。如果整个行业有很多人愿意做坏这个市场,那是降低了整个行业议价的筹码。


另外,你把 sle_1.text 和 sle_2.text两边的单引号改为双引号就可以了。留意引号要匹配。