xlsx:
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myExcel2007file.xlsx;Extended Properties=“Excel 12.0 Xml;HDR=YES;IMEX=1”;
xlsb:
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myBinaryExcel2007file.xlsb;Extended Properties=“Excel 12.0;HDR=YES”;
xlsm:
Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myExcel2007file.xlsm;Extended Properties=“Excel 12.0 Macro;HDR=YES”;
See also my prev. post about driver download: https://blog.abadev.com/?p=1030
Если бы я нашел какой-нибудь сервис (в Европе и США), который бы позволил недорого рассылать “разовые” CD с небольшим напечатаным письмом, я бы некоторым своим покупателям после регистрации высылал бы диск и красивую бумажку с сертификатом. Просто делать это самому из Украины муторно (каменный век с “носителем информации”), а за рубежом разовые посылки тоже никто слать не будет.
А еще можно к какому-нибудь празднику выслать всем юзерам красивые открытки+ручку/кепку/чашку
Очень хочется такое осуществить. Надеюсь, что сделаб и не разорюсь полностью:-)
In friday we moved on new server in Toronto from old in Vancuver.
All services (blog, photo galeries, all domains/sites, mailboxes etc) works well as I see.
www.budgetreseller.com
Случайно увидел запрос от stenanie.livejournal.com
“Хочу, чтобы в системе были веб-камеры, которых на самом деле нет. И чтобы с них шла картинка из какого-нибудь AVI-файла. Искал разные штуки в Google – слишком всего дофига, куча всего платного. Непонятно, что выбрать, посоветуйте может быть.
Второй уровень сложности той же задачи – виртуальная веб-камера выдаёт не картинку из готового AVI-файла, а картинку с реальной веб-камеры (или другой виртуальной), с наложенными на неё эффектами.”
Очень хорошая идея для shareware
function TranslateCharsetInfo(lpSrc: integer;
var lpCs: TCharsetInfo; dwFlags: DWORD): BOOL; stdcall;
external ‘gdi32.dll’ name ‘TranslateCharsetInfo’;
function GetDefaultCharset: TFontCharset;
var
dwCodePage: dWord;
CharSetInfo: TCharSetInfo;
begin
{get default codepage}
dwCodePage := StrToIntDef(GetLocaleStr(GetUserDefaultLCID, LOCALE_IDEFAULTANSICODEPAGE, ”), 0);
if dwCodePage = 0 then
dwCodePage := StrToIntDef(GetLocaleStr(GetSystemDefaultLCID, LOCALE_IDEFAULTANSICODEPAGE, ”), GetACP());
{convert codepage into charset}
if TranslateCharsetInfo(dwCodePage, CharSetInfo, TCI_SRCCODEPAGE) then
Result := CharSetInfo.ciCharset
else
Result := 0
end;
{$IFDEF VER200}
{$DEFINE SMForDelphi3}
{$DEFINE SMForDelphi4}
{$DEFINE SMForDelphi5}
{$DEFINE SMForDelphi6}
{$DEFINE SMForDelphi7}
{$DEFINE SMForDelphi2005}
{$DEFINE SMForDelphi2006}
{$IFDEF BCB}
{$DEFINE SMForBCB2006}
{$DEFINE SMForBCB2007}
{$DEFINE SMForBCB2009}
{$ENDIF}
{$DEFINE SMForDelphi2007}
{$DEFINE SMForRADStudio2007}
{$DEFINE SMForDelphi2009}
{$ENDIF}
Just found that most menu items have no any defined shortcut. For example, Open ->Ctrl+O, Save->Ctrl+S etc
Fixed today:-)
the TSMReport component now have the LoadReportFromStream and SaveReportToStream methods
Using these methods you may load/save the reports in any stream, including BLOB-streams for field in any dataset or implement the packed/encoded streams (zip/ZLib, for example)
Thanks for the software which has rescued a problem I have had while away from the office with Microsoft Outlook failing to install.
Professor David Cope
Trevor Harvey:
“xlsview received, installed and a long lost spreadsheet which I had given up hope of ever seeing again has been translated to openoffice.calc and is looking great.
Well done for some really useful S/W and excellent service.”