>>>>>Local lcLocalConnectionstring As String Pretext 8 >>>>>TEXT TO lcLocalConnectionstring NOSHOW >>>>>Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5; >>>>>Data Source=d:\soykan.sdf; >>>>>Mode=ReadWrite|Share Deny None; >>>>>SSCE:Max Buffer Size=640; >>>>>SSCE:Database Password=''; >>>>>SSCE:Encrypt Database=False; >>>>>SSCE:Default Lock Escalation=100; >>>>>SSCE:Temp File Directory=""; >>>>>SSCE:Default Lock Timeout=5000; >>>>>SSCE:AutoShrink Threshold=60; >>>>>SSCE:Flush Interval=10; >>>>>SSCE:Test Callback Pointer=0; >>>>>SSCE:Max Database Size=512; >>>>>SSCE:Temp File Max Size=128 >>>>>ENDTEXT >>>>> >>>>>Local osqlce As adodb.Connection >>>>>osqlce=Createobject('ADODB.Connection') >>>>>osqlce.ConnectionString=lcLocalConnectionstring >>>>>lnConn=osqlce.Open() >>>>> >>>>> >>>>> >>>>>>>>>
>>>>TEXT TO lcLocalConnectionstring NOSHOW PRETEXT 15 && PRETEXT also :-) >>>>Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5; >>>>Data Source=d:\soykan.sdf; >>>>ENDTEXT >>>>... >>>>>>>
>Local lcLocalConnectionstring As String Pretext 15 &&8 >TEXT TO lcLocalConnectionstring NOSHOW >Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5 >Data Source=d:\soykan.sdf >ENDTEXT > >Local osqlce As adodb.Connection >osqlce=Createobject('ADODB.Connection') >osqlce.ConnectionString=lcLocalConnectionstring >lnConn=osqlce.Open() >>
clear lcLocalConnectionstring = ; "Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5;"+; "Data Source=C:\Program Files\Microsoft SQL Server Compact Edition\v3.5\Samples\northwind.sdf" Local osqlce As adodb.Connection osqlce=Createobject('ADODB.Connection') osqlce.ConnectionString=lcLocalConnectionstring osqlce.Open() Local loCommand As adodb.Command loCommand = Createobject("adodb.command") loCommand.CommandText = "select * from customers" loCommand.ActiveConnection = osqlce loRS = loCommand.Execute() Do While !loRS.Eof ? loRS.Fields(0).Value loRS.movenext() Enddo osqlce.Close()Cetin