OpenOffice.info

function ReturnRowSetBlue(strSQL_Blue as string) as object
	dim oRowSetBlue as object
	oRowSetBlue = createUnoService("com.sun.star.sdb.RowSet")
	oRowSetBlue.DataSourceName = "Blue"

	oRowSetBlue.CommandType = com.sun.star.sdb.CommandType.COMMAND
	oRowSetBlue.Command = strSQL_Blue
	oRowSetBlue.execute()
	ReturnRowSetBlue = oRowSetBlue
end function

function ReturnRowSetRed(strSQLRed as string) as object
	dim oRowSetRedas object
	oRowSetRed = createUnoService("com.sun.star.sdb.RowSet")
        oRowSetRed.DataSourceName = "Red"
	
	oRowSetRed.CommandType = com.sun.star.sdb.CommandType.COMMAND
	oRowSetRed.Command = strSQL_Red
	msgbox "DataSourceName =" + oRowSetRed.DataSourceName	     
        oRowSetRed.execute()
	ReturnRowSetRed = oRowSetRed
end function

msgbox "DataSourceName =" + oRowSetGW.DataSourceName	

hi,

dringendes problem mit 2 verschiedenen mysql-datenbanken:
ich habe eine tabelle "tableBlue1" in der datenbank, auf die sich die registrierte datenquelle "Blue" bezieht und eine tabelle "tableRed1" in der datenbank, auf die sich die registrierte datenquelle "Red" bezieht.
die folgenden beiden functionen benutzen die 2 verschiedenen datenquellen ("Red" und "Blue") und jede gibt ein rowset mit den benötigten daten zurück:

[code]
function ReturnRowSetBlue(strSQL_Blue as string) as object
dim oRowSetBlue as object
oRowSetBlue = createUnoService("com.sun.star.sdb.RowSet")
oRowSetBlue.DataSourceName = "Blue"

oRowSetBlue.CommandType = com.sun.star.sdb.CommandType.COMMAND
oRowSetBlue.Command = strSQL_Blue
oRowSetBlue.execute()
ReturnRowSetBlue = oRowSetBlue
end function

function ReturnRowSetRed(strSQLRed as string) as object
dim oRowSetRedas object
oRowSetRed = createUnoService("com.sun.star.sdb.RowSet")
oRowSetRed.DataSourceName = "Red"

oRowSetRed.CommandType = com.sun.star.sdb.CommandType.COMMAND
oRowSetRed.Command = strSQL_Red
msgbox "DataSourceName =" + oRowSetRed.DataSourceName
oRowSetRed.execute()
ReturnRowSetRed = oRowSetRed
end function[/code]

wen ich diesen code 20 nal ausführe, dann klappt es vllt 19 mal udn einmal bekomme ich eine error message:
"table Blue.tableRed1 doesn't exist" oder
"table Red.tableBlue1 doesn't exist"

wenn ich zum bsp die function ReturnRowSetRed() mit dem string strSQLRed "select * from tableRed1" benutze, ist die error message die folgende:
"table Blue.tableRed1 doesn't exist"

natürlich weiss ich, dass das ding nicht existiert!!!!
aber ich hab ja auch nicht danach gefragt!!!!!!!!!!!
das passiert auch andersrum:
"table Red.tableBlue1 doesn't exist"

wenn ich ein statement nit einer messagebox benutze so wie in der function ReturnRowSetRed():
[code]
msgbox "DataSourceName =" + oRowSetGW.DataSourceName
[/code]

sehe ich in der msgbox, dass die datenquelle des rowsets genauso ist, wie sie sein sollte. aber dann....
trotzdem absturz und fehlermeldugn!


habe auch probiert mit rowset.activeconnection= xyz die datenquelle zu definieren.
gleiches resultat: meistens klappt's und manchmal: crash....
das nervigste ist, dass der fahler nicht immer auftritt, sodass ich überhaupt keinen ansatz habe.

ausser den beiden registrierten datasources kennt openoffice auch noch 3 andere, aber es werden immer nur die beiden verwechselt, die ich im code anspreche.

bin wirklich am verzweifeln!!!!
hiiiiiiiiiiiiiiiiilfe!!!!!!!!1!