sql服务的连接和打开.docVIP

//得到本地计算机的主机名 RegistryGet(hkey_local_machine\system\currentcontrolset\control\computername\computername, computername, RegString!, is_servername) sle_servername.text=is_servername 开始按牛 string ls_servername //输入的服务器名称 string ls_username //输入的数据库用户 string ls_password //输入的口令 string ls_dbname //输入的数据库名 string ls_inputfile=jsjdj.sql//导入的数据库角本文件 string ls_connectfile=dbconnet.sql //安装后创建的数据库连接文件 int li_return //各种判断状态的返回值 string ls_temp //临时使用的字符型变量 integer li_count //指定server上的数据库数量 integer li_i //循环标记 integer li_FileIN //打开文件的句柄 string ls_Input //文件