Здравствуйте, dmitry_npi, Вы писали:
_>А в чем проблема-то? Или вам нужно сгенерировать чисто управляемый код (/clr:pure), без примесей обычного?
честно сказать не особо понлял)) но суть такая, мне нужно сделать приложение именно винформ, а я умею подключать импорт только в консольном приложении...
все заработало, за совет спасибо, но теперь новая проблема. если искать несколько слов подрят, то почемуто ищется только первое(((
Word::Application ^w = gcnew Word::Application();
Word::Document ^doc = gcnew Word::Document();
System::Object ^objFileName = gcnew System::Object();
System::Object ^objFileNameSave = gcnew System::Object();
System::Object ^objMissing = gcnew System::Object();
System::Object ^objReplace = gcnew System::Object();
objReplace=1;
w->Visible=true;
objFileName = "C:\\для rabota\\employee.doc";
objMissing = Missing::Value;
String ^sid="@id";
String ^sname="@name";
String ^sresume="@resume";
String ^sdob="@dob";
String ^spicture="@picture";
String ^srep;
for (int i=0; i<=this->dataGridView2->RowCount-1; i++){
doc = w->Documents->Open(objFileName,
objMissing,objMissing,objMissing,objMissing,objMissing,
objMissing,objMissing,objMissing,objMissing,objMissing,
objMissing,objMissing,objMissing,objMissing,objMissing);
objFileNameSave = "C:\\для rabota\\employee"+dataGridView2->Rows[i]->Cells[0]->Value->ToString()+".doc";
doc->SaveAs(objFileNameSave,objMissing,objMissing,objMissing,objMissing,
objMissing,objMissing,objMissing,objMissing,objMissing,
objMissing,objMissing,objMissing,objMissing,objMissing,objMissing);
//id
srep=this->dataGridView2->Rows[i]->Cells[0]->Value->ToString();
w->Selection->Find->ClearFormatting();
w->Selection->Find->Text = sid;
w->Selection->Find->Replacement->ClearFormatting();
w->Selection->Find->Replacement->Text = srep;
w->Selection->Find->Execute(objMissing,objMissing,objMissing,objMissing,
objMissing,objMissing,objMissing,objMissing,objMissing,
objMissing,objReplace,objMissing,objMissing,objMissing,
objMissing);
//name
srep=this->dataGridView2->Rows[i]->Cells[1]->Value->ToString();
w->Selection->Find->ClearFormatting();
w->Selection->Find->Text = sname;
w->Selection->Find->Replacement->ClearFormatting();
w->Selection->Find->Replacement->Text = srep;
w->Selection->Find->Execute(objMissing,objMissing,objMissing,objMissing,
objMissing,objMissing,objMissing,objMissing,objMissing,
objMissing,objReplace,objMissing,objMissing,objMissing,
objMissing);
//и дальше еще несколько слов...
меняется толькопервое слово во всех документах