Выборка данных с dbase 3

[uBaH]

Можно ли приконектится к DBASE 3 так же как и к sqlite - _SQLite_Open ("data.dat") ?

 

[kaster]

Re: dbase 3

Предупреждение

За нарушение правил форума (пункт Б.5):

Имя темы должно нести смысловую нагрузку (отражать суть вопроса/проблемы)
Правильно сформулированное название темы привлекает больше внимания, и шансы получить конкретный ответ увеличиваются.

Как правильно называть темы

"dbase 3" - это неприемлемое название темы, переименуйте тему иначе она будет закрыта, а вам возможно будет выдан бан на несколько дней.

С уважением, Модератор раздела.

 

[Redline]

По идее для этого нужен установленный драйвер ODBC для данной базы, и все дальнейшие обращения будут вестись через него.
Вот выдержки для MySQL & PostgreSQL:

Func _MySQLConnect($sUsername, $sPassword, $sDatabase, $sServer, $sDriver = "{MySQL ODBC 3.51 Driver}", $iPort=3306)
	Local $v = StringMid($sDriver, 2, StringLen($sDriver) - 2)
	Local $key = "HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers", $val = RegRead($key, $v)
	If @error or $val = "" Then
		SetError(2)
		Return 0
	EndIf
	$ObjConn = ObjCreate("ADODB.Connection")
	$Objconn.open ("DRIVER=" & $sDriver & ";SERVER=" & $sServer & ";DATABASE=" & $sDatabase & ";UID=" & $sUsername & ";PWD=" & $sPassword & ";PORT="&$iPort)
	If @error Then
		SetError(1)
		Return 0
	Else
		Return $ObjConn
	EndIf
EndFunc   ;==>_MySQLConnect

$oconn = ObjCreate("ADODB.Connection")
$DSN = "DRIVER={PostgreSQL Ansi};SERVER=192.168.2.197;DATABASE=lms_db;UID=postgres;PWD=;"
$d = $oconn.Open($DSN)
$oconn.Execute("insert into t1Table values('d');")
$rst = ObjCreate("ADODB.Recordset")
$rst.Open("Select * from t1Table", $d, 2, 3)
$aResultsArray = $rst.GetRows()
_ArrayDisplay($aResultsArray, "Results")