PDA

View Full Version : سوال: نشان دادن یک فایل word در روی فرم ویندوز



mehrnoosh_al62
دوشنبه 26 اسفند 1387, 12:29 عصر
سلا م دوستان
راهی هست که بشه فایل های ورد (doc,docx) رو درون فرم ویندوز باز کرد. مثلا داخل یک RichTextBox ؟
مثلا فایل Excel رو میشه تو DataGridView نشون داد. راهی برای نشون دادن فایل های ورد هم هست؟

mehrnoosh_al62
سه شنبه 27 اسفند 1387, 09:59 صبح
یعنی هیچ راهی نیست؟؟؟!!!!میشه فایل ورد رو تو RichTextBox نشون داد؟؟

arsalansalar
سه شنبه 27 اسفند 1387, 12:57 عصر
http://www.barnamenevis.org/forum/showthread.php?t=37515

http://www.barnamenevis.org/forum/showthread.php?t=36618

http://barnamenevis.org/forum/showthread.php?t=82513

mehrnoosh_al62
سه شنبه 27 اسفند 1387, 15:45 عصر
دوست عزیز به خاطر وقتی که گذاشتید ممنون
ولی منظور من این لینک هایی که فرستادین نبود. من میخوام فایل های وردی که موجود هست رو تو خود فرم نشوم بدم. کار فقط جنبه ویو داره.
تاکید میکنم حتما باید تو خود فرم باز شه...

rooshan2008
پنج شنبه 29 اسفند 1387, 00:21 صبح
سلام

این کد رو ببینید ....:لبخند:

Hossis
شنبه 08 اسفند 1388, 15:03 عصر
سلام

این کد رو ببینید ....:لبخند:
اين کد براي نشان دادن ورد خوب هست ولي هنگام اتمام کار، اون رو نمي‌بنده و حافظه رو آزاد نمي‌کنه

amin_iman82
یک شنبه 09 اسفند 1388, 00:54 صبح
خواندن اطلاعات فایل Excel و کپی کردن اطلاعات داخل DataSet

DataSet رو میتونید به یه DataGrid ربط بدید یا ...

خواندن Docx رو میگردم اگه چیزی پیدا کنم میذارم همین جا.



Public Function ReadExcelIntoDataset(ByVal file As String) As Data.DataSet
'Create the DataSet that will hold the data from the sheet
Dim dsExcel As New Data.DataSet
'First name sure the file exists
If Not IO.File.Exists(file) Then
MessageBox.Show("The file provided doesn't exist. Please check the name and try again")
Else
Try
'Declare the variables needed for the reading of the Excel file
Dim sOleDbString As New String("SELECT * FROM [sheet1$]")
'Create our connection to the Excel sheet
Dim cnExcel As New Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; data source='" & _
file & " '; " & "Extended Properties=Excel 11.0;")
'Create our command object
Dim cmdExcel As New Data.OleDb.OleDbDataAdapter(sOleDbString, cnExcel)
'Now we try to fill the DataSet with the data from the Excel file
Try
'Fill was successful
cmdExcel.Fill(dsExcel)
'Catch any errors that have occurred
Catch ex As Exception 'Fill failed
MessageBox.Show(ex.Message)
dsExcel = Nothing
'Finally close the connection
Finally
cnExcel.Close()
End Try
'Catch any errors that may have occurred
Catch ex As Exception
MessageBox.Show(ex.Message)
dsExcel = Nothing
End Try
Return dsExcel
End If
End Function
موفق باشید.

Hossis
دوشنبه 10 اسفند 1388, 08:24 صبح
مسئله بر سر خواندن اطلاعات از فايل ورد نيست بلکه مشکلي که من دارم با اين فايل ضميمه اخير،‌ بستن پنچره و پروسه اي هست که با اون باز شده و گرنه تو خوندن هيچ مشکلي نداره

ali.hojjati
سه شنبه 11 اسفند 1388, 12:22 عصر
با سلام ببین می تونی او پروسه رو با یک خط فرمان ببندید.(Taskkill)

hmd.tz1988
شنبه 26 تیر 1389, 20:12 عصر
سلام

این کد رو ببینید ....:لبخند:


سلام

واقعا ممنونم

خیلی به دردم خورد

خدا مراد دلتو بده