|
Bulky Fellow wrote: Everytime the exe runs, the EXE will "upack" the spreadsheet from the resource
Yeah, putting the sheet into a resource is no problem - at compile time.
Bulky Fellow wrote: it will "repack" it into the resource.
Putting it back into the .EXE or .DLL at runtime is the problem. Using normal methods, once the .DLL is loaded, the file is locked until the termination of your app. Again, it can't be modified.
You MAY be able to gleen something useful from the app in this[^] article though. It copies resources between .EXE's and .DLL's, but there's a lot of hoops to jump through.
|
|
|
|
|
Hi, i have developed net browser in vb.net, using webbrowser control. My problem is, when i click on go button for navigating the url, if there is no internet connection is available, or server is not reponding, the webbrowser will show the default page of Internet Explorer that is page not found. i want to use my own page instead of this default Internet Explorer page,how can i do this???
thx in advance....
King
|
|
|
|
|
You've developed a new browser using the supplied web browser control? Why?
|
|
|
|
|
Hi,
As the tile says. this column will be used to specify a file path, so the user will be given a choice to write manually a file path into the textbox column or click a button inside that column and a openFileDialog will appear...
This interface is used in SQL DBMS programs, when you are attaching a database, the same dataGrid is used to locate ldf and mdf files...
Thank you!
|
|
|
|
|
You'll have to make you're own DataGridViewColumn for this. A full explanation of doing this is way too much for a couple of forum posts. There's simply too much detail to cover.
Search for articles on the subject of "Custom DataGridViewColumn". Results[^]
|
|
|
|
|
how do u fill up columns and make changes in it using grid view?
|
|
|
|
|
to fill a datagrid you attach a datasource
Utilise the edit controls to make changes to the data in the grid
Do some research - the question indicates you have done no work towards getting this knowledge.
|
|
|
|
|
hai,
i am using dotnet2005.i do my project in vb.net windows application.
if there are 4 rows,if i delete slno 2,the slno 3 will automatically changed as slno 2,then slno 4 will automatically changed as slno 3.
for ex,
there are 3 columns and 4 rows are displayed in datagridview from sqldatabase,
slno name city
1 guru cbe
2 ram salem
3 balu trichy
4 mahesh cbe
if i delete slno 2 means,the slno 3 will automatically changed as 2,then slno 4 will automatically changed as 3.
after i delete slno 2 means,i want to display in datagridview from sqldatabase like following,
slno name city
1 guru cbe
2 balu trichy
3 mahesh cbe
is it possible,if possible means how to do these.
or any other way to do these or any options in datagridview to generate slno with starting no 1 or using programmatically can to do these.
so any way i want to generate slno.i want in windows application.
|
|
|
|
|
This is automatically what happens, unless the number you're showing is an id from the database. If this is so, it cannot be changed, not easily. Just show a number other than the Id, if you want to show a row number.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
now i remove slno from database...i tried to genarate slno in datagridview...there is any option to generate slno in datagridview...or how to put row number....so i want to genarate slno or to put row number...
|
|
|
|
|
Hi All,
Iam using ShellExecute API function to execute the file.
File may be any type.
I want to get the Process ID(PID) of the particular file which i executed.
I already tried Shell command, but it isn't work.
Thanks & Regards
Kumaran
|
|
|
|
|
Process.Start will return the handle. Assuming this is VB.NET.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
Thanks Christian Graus.
but i need in vb6
Thanks & Regards
Kumaran
|
|
|
|
|
I need to add the item and value in the list box. I add this using strtext and strvalue respectively.
But the strvalue i need to add is a string. so that the value when adding cannot get duplicated.
How can i add string value to strvalue
I am taking this values from two textboxes
My coding is as follows....
Dim i As Integer
Dim item As New Item
For i = 0 To ListBox1.Items.Count - 1
item = ListBox1.Items(i)
If TextBox1.Text = item.strValue Then
MsgBox("Already you have added this link", MsgBoxStyle.Information, "Knowledge Base")
Exit Sub
End If
Next
item.strText = Textbox2.Text
item.strValue = TextBox1.Text
lstLinks.Items.Add(item)
txtWebLinkDescriptions.Text = ""
txtWebLinks.Text = ""
It shows that the string value cannot be bind to integer value....
May u help me to solve these please....
Thanks in advanvce........
|
|
|
|
|
Hi,
I think this code will help you...
Dim i As Integer<br />
<br />
For i = 0 To ListBox1.Items.Count - 1<br />
<br />
If ListBox1.Items(I).Tostring = TextBox1.Text Then<br />
MsgBox("Already you have added this link", MsgBoxStyle.Information, "Knowledge Base")<br />
Exit Sub<br />
End If<br />
Next<br />
<br />
lstLinks.Items.Add(TextBox1.Text)
Thanks,
Nanda
|
|
|
|
|
Thank u for ur response Nanda
But, my question is how to get the value of the item in case of string
ie, since because the value i use here is a string, it displays error
as "Conversion from string to type integer is not valid"
will u please tell me how to get the string value for the item
ie, i need to use string value for item.strvalue
Thank u once again
|
|
|
|
|
The easy way is to build a dictionary where the key is the strValue, or just a list of strings, even. Do a search, if the value is in there, then it's been added already.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
Hi,
I am getting the 'Type initializer error' in module1 (for eg see the below code). The thing is i want to get the value from the dll which is added as a reference to this exe, where the value is declared in the module. Please Review the below code and suggest/help me.
Project1.dll
Module Module1<br />
Public MyPath As String = "C:\Nanda"<br />
End Module
Public Class Class1<br />
<br />
Public Sub Query()<br />
MsgBox(MyPath, MsgBoxStyle.Information, "Project1")<br />
End Sub<br />
<br />
End Class
Project2.exe
Public Class Form1<br />
<br />
Public MyReport As New Project1.Class1<br />
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click<br />
MyReport.Query()<br />
End Sub<br />
End Class
Thanks,
Nanda
|
|
|
|
|
Nanda1605 wrote: MsgBox(MyPath, MsgBoxStyle.Information, "Project1")
Try this:
MsgBox(Module1.MyPath, MsgBoxStyle.Information, "Project1")
modified 27-Feb-21 21:01pm.
|
|
|
|
|
Hi guys
My problem is this . I need to generate a large number of records from SQL server 2000 to and excel spreadsheet. However the durations of time id too long. For about 900 records there's about 40 min.
Any idea or guide to boast up the speed?
i am generating to excel .xls
Basically i have a main details table link to many sub details Table
Then first i select all the main info id and use the for loop to loop through all the sub details table whether the id is match. then insert into the excel spreadsheet. The method i use is Create the XLS file then connect to it and do insert statement to input data. This method work but when inserting 900 records it took about 30 mins or more....
Any suggetion or solution please guide.... Need help man
Thanks a million guys need it urgently
KaKaShi HaTaKe
KaKaShi HaTaKe
|
|
|
|
|
Unless you REALLY need to create an actual .XLS file I would recommend creating a .csv file and letting excel convert it when it is opened. This eliminates all the VBA stuff and you should be able to do 900 rows in under 1 sec.
There are plenty of article/examples on CP
|
|
|
|
|
What's a CP?
KaKaShi HaTaKe
|
|
|
|
|
1. take one of the output excel files and save it as XML
2. open the XML file with your code editor (Visual Studio I suppose?)
3. see what the file's structure looks like
4. adapt the following sub to your file's structure, and content, and to whatever other specific requirements you have:
Public Sub DatasetToExcel(ByVal ds As DataSet, ByVal ExcelPath As String, Optional ByVal Title1 As String = "", Optional ByVal Title2 As String = "")<br />
If File.Exists(ExcelPath) = True Then<br />
If MsgBox("Tiedosto on jo olemassa. Haluatko korvata sen?", MsgBoxStyle.YesNo) = MsgBoxResult.Yes Then<br />
File.Delete(ExcelPath)<br />
Else<br />
ExcelPath = InputBox("Muuta nimi: ", "Tiedosto olemassa", ExcelPath)<br />
End If<br />
End If<br />
'use .xls even though its an xml file<br />
Dim doc As New StreamWriter(ExcelPath)<br />
Try<br />
Dim startExcelXML As String = ""<br />
startExcelXML &= "<xml version="">"<br />
startExcelXML &= vbNewLine & "<workbook xmlns="" urn:schemas-microsoft-com:office:spreadsheet="" hold=" /"> startExcelXML &= vbNewLine & Microsoft.VisualBasic.Chr(10) & "" + " xmlns:o=""urn:schemas-microsoft-com:office:office"""<br />
startExcelXML &= vbNewLine & "xmlns:x=""urn:schemas- microsoft-com:office:" + "excel"""<br />
startExcelXML &= vbNewLine & "xmlns:ss=""urn:schemas-microsoft-com:" + "office:spreadsheet"">"<br />
<br />
'write the styles tags that format the data and cells properly<br />
startExcelXML &= vbNewLine & "<styles>"<br />
<br />
startExcelXML &= vbNewLine & " <style ss:id="" default="" ss:name="" normal="">"<br />
startExcelXML &= vbNewLine & " <alignment ss:vertical="" bottom="" />"<br />
startExcelXML &= vbNewLine & " <borders />"<br />
startExcelXML &= vbNewLine & " <font />"<br />
startExcelXML &= vbNewLine & " <interior />"<br />
startExcelXML &= vbNewLine & " <numberformat />"<br />
startExcelXML &= vbNewLine & " <protection />"<br />
startExcelXML &= vbNewLine & " </style>"<br />
'Title style<br />
startExcelXML &= vbNewLine & "<style ss:id="" title="">"<br />
startExcelXML &= vbNewLine & "<alignment ss:horizontal="" center="" ss:vertical="" bottom="" />"<br />
startExcelXML &= vbNewLine & "<font x:family="" swiss="" ss:size="" 12="" ss:bold="" 1="" />"<br />
startExcelXML &= vbNewLine & "</style>"<br />
'Column header style<br />
startExcelXML &= vbNewLine & "<style ss:id="" colheader="">"<br />
startExcelXML &= vbNewLine & "<alignment ss:horizontal="" center="" ss:vertical="" bottom="" />"<br />
startExcelXML &= vbNewLine & "<font x:family="" swiss="" ss:color="" #ffffff="" ss:size="" 10="" ss:bold="" 1="" />"<br />
startExcelXML &= vbNewLine & "<interior ss:color="" #969696="" ss:pattern="" solid="" />"<br />
startExcelXML &= vbNewLine & "</style>"<br />
'Row style<br />
startExcelXML &= vbNewLine & " <style ss:id="" reg="">"<br />
startExcelXML &= vbNewLine & " <font x:family="" swiss="" ss:bold="" 0="" />"<br />
startExcelXML &= vbNewLine & " </style>"<br />
<br />
startExcelXML &= vbNewLine & "</styles>"<br />
'write the header to the file<br />
doc.WriteLine(startExcelXML)<br />
'write one sheet per table<br />
For Each tab As Data.DataTable In ds.Tables<br />
Dim sheetname As String = "<worksheet ss:name="<br mode=" hold=" /"> sheetname &= Microsoft.VisualBasic.Chr(34)<br />
sheetname &= tab.TableName.Trim<br />
sheetname &= Microsoft.VisualBasic.Chr(34)<br />
sheetname &= ">"<br />
With doc<br />
.WriteLine(sheetname)<br />
.WriteLine("<table>")<br />
.WriteLine("<row>")<br />
<br />
'write a title line<br />
If Title1 = "" And Title2 = "" Then<br />
Else<br />
.Write("<cell ss:styleid="" title=""><data ss:type="" string="">")<br />
.Write(Title1)<br />
.WriteLine("</data></cell>")<br />
.Write("<cell ss:styleid="" title=""><data ss:type="" string="">")<br />
.Write(Title2)<br />
.WriteLine("</data></cell>")<br />
.WriteLine("<row>")<br />
End If<br />
<br />
'write the column headers<br />
For Each col As DataColumn In tab.Columns<br />
.Write("<cell ss:styleid="" colheader=""><data ss:type="" string="">")<br />
.Write(col.ColumnName)<br />
.WriteLine("</data></cell>")<br />
Next<br />
.WriteLine("</row>")<br />
<br />
'write the table<br />
For Each row As DataRow In tab.Rows<br />
.WriteLine("<row>")<br />
For i As Integer = 0 To tab.Columns.Count - 1<br />
.Write("<cell ss:styleid="" reg=""><data ss:type="" string="">")<br />
.Write(row.Item(i))<br />
.WriteLine("</data></cell>")<br />
Next<br />
.WriteLine("</row>")<br />
Next<br />
.WriteLine("</row></table>")<br />
.WriteLine("</worksheet>")<br />
End With<br />
Next<br />
doc.WriteLine("</workbook>")<br />
doc.Close()<br />
Catch Ex As Exception<br />
doc.Close()<br />
EC(Ex)<br />
End Try<br />
End Sub</xml>
5. Good luck.
Johan
My advice is free, and you may get what you paid for.
|
|
|
|
|
i'm using microsoft visual studio. i want to update my table. how to update a field?
i have a table that have 2 field 1. run_number 2. date. each time i add my input it will update the running no and date.. so i can know that input is the 2nd or 3rd input that i've key-in on that day. and the current running number i will have it in my document number that is in this format <yyyymmdd><custid><run_no>. This doc number is for my reference. i hope i explain it well because my english is not that good. somebody pls help me..
|
|
|
|
|
A table in a database ? You need the unique Id and then just write SQL that will update the record in question, and call it using ADO.NET.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
