|
Hi,
I want to PDF for creating the files that will go as attachments to various users in mine project . To my knowledge VB.Net dosent have in built support for creating PDF files. There are some libraries which can be used to create PDF files but those are licensed version.
If you know some open source PDF libraries or other helpful information, please mail those details. Please explain other formats which can be used to create the files for mine project.
|
|
|
|
|
|
Hi,
Do you know any open source PDF libraries.
how to write in pdf using vb.net
|
|
|
|
|
the first link I provided is an open source way to create pdf's
for editing an existing one I havn't found any so far. I'v been looking for quite a while now since I could use it aswell but so far all the coude I'v found use the adobe library's and to be able to use them you need the full version
If I find a way I'll let you know but I'm afraid that for the moment I have to assume that it is not possible to do it without bying the full version of adobe (at least not legally possible)
|
|
|
|
|
Hi All,
I have one cheque printing module in my vb.net application. In that i am saving the x,y positions of different labels and setting label positions while previewing. Then I am printing the form as such. Since there is no form.print in vb.net, i am using the following code:
Private Print_Image As Image
'This is used to take the picture
Declare Auto Function BitBlt Lib "GDI32.DLL" ( _
ByVal hdcDest As IntPtr, _
ByVal nXDest As Integer, _
ByVal nYDest As Integer, _
ByVal nWidth As Integer, _
ByVal nHeight As Integer, _
ByVal hdcSrc As IntPtr, _
ByVal nXSrc As Integer, _
ByVal nYSrc As Integer, _
ByVal dwRop As Int32) As Boolean
Private Sub mnuPrint_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles mnuPrint.Click
'We make the form look pretty before its picture
Application.DoEvents()
Me.Refresh()
Application.DoEvents()
'Get a Graphics Object from the form
Dim FormG As Graphics = Me.CreateGraphics
FormG.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
'Create a bitmap from that graphics
Dim i As New Bitmap(Me.Width - 6, Me.Height, FormG)
'Create a Graphics object in memory from that bitmap
Dim memG As Graphics = Graphics.FromImage(i)
'get the IntPtr's of the graphics
Dim HDC1 As IntPtr = FormG.GetHdc
Dim HDC2 As IntPtr = memG.GetHdc
'get the picture
BitBlt(HDC2, 0, 0, Me.ClientRectangle.Width, Me.ClientRectangle.Height, HDC1, 0, 0, 13369376)
''Clone the bitmap so we can dispose this one
Me.Print_Image = i.Clone()
'Clean Up
FormG.ReleaseHdc(HDC1)
memG.ReleaseHdc(HDC2)
FormG.Dispose()
memG.Dispose()
i.Dispose()
'Show the PrintDialog
PrintDialog1 = New PrintDialog
PrintDialog1.Document = PrintDocument1
Dim r As DialogResult = PrintDialog1.ShowDialog
If r = DialogResult.OK Then
'Print the document
PrintDocument1.Print()
End If
End Sub
Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
e.Graphics.DrawImage(Me.Print_Image, 0, 0)
End Sub
All these are working fine.But now the problem is, all writings in the cheque are scattered and there is no clarity & smoothness. Anybody have any ideas to increase the clarity & smoothness? Or Is there any other ways to achive this?
Regards,
Hareesh
|
|
|
|
|
|
Thank u Jones 4 ur reply. But i am using VS2003 and Microsoft .Net Framework 1.0
|
|
|
|
|
i have one datatable contains price column
i need to calculate the sum of the prices
and then delete all the rows from the table
my code is :
dim total as decimal
total=dataset.tables("sourcetable").columns("price").experssion="sum(price)"
but when the code executed it generate exception
can not use experssion in an circual function
second:
i need to know how to delete all rows from datatable at run time
regards
|
|
|
|
|
Hi,
One possible way is to simply loop through the rows of your dataset and add the values from the column you need:
<br />
Dim rw as DataRow<br />
Dim Total as Decimal<br />
'First "save" any changes the user made before this bit of code is triggered<br />
Dataset.AcceptChanges()<br />
'Then loop through all rows in the dataset<br />
For Each rw In Dataset.tables("sourcetable").Rows<br />
'best to add some validation here:<br />
If IsError(Decimal.Parse(rw.Item("price"))) Then<br />
'someone wrote his name in the price field instead of a decimal<br />
'kick his ass<br />
Else<br />
'increase the value of variable Total<br />
Total += rw.Item("price")<br />
End If<br />
Next<br />
'and then for example:<br />
TxtTotal.Text = Total.ToString<br />
Hope this helps you,
Johan
My advice is free, and you may get what you paid for.
|
|
|
|
|
johan i'm really greatful for you
you helped me before and i really thank you for all
i'll try your code
and post you again
Regards
|
|
|
|
|
hi guy s
i am working in frame work 1.1 in which for generic lists i am inheriting
some of my classed from collection base class and all of that i am doing in c#,
i have a function here
public class EmployeeCollection:System.Collections.CollectionBase
public Employee this[int index]
{
get
{
return (Employee) List[index];
}
set
{
List[index] = value;
}
}
i simply need the above functionality code in vb.net,,
i couyld not get that sysnatx if i want the same function in vb.net
thanks in advance
best regards
hello
|
|
|
|
|
the following link will convert c# to vb.net (I use it alot and it works fine(somethimes some adjustments are needed dough)):
http://www.developerfusion.co.uk/utilities/convertcsharptovb.aspx[^]
for you'r code this is the output:
Public Class EmployeeCollection<br />
Inherits System.Collections.CollectionBase<br />
Public Default Property Item(ByVal index As Integer) As Employee<br />
Get<br />
Return DirectCast(List(index), Employee)<br />
End Get<br />
Set<br />
List(index) = value<br />
End Set<br />
End Property<br />
End Class
-- modified at 7:26 Tuesday 17th July, 2007
just noticed the code above will not compile
this will and I think it will work too (hope so  )
Inherits System.Collections.CollectionBase<br />
<br />
Public Property employee(ByVal index As Integer)<br />
Get<br />
Return MyBase.List(index)<br />
End Get<br />
Set(ByVal value)<br />
MyBase.List(index) = value<br />
End Set<br />
End Property
|
|
|
|
|
i build a notepad in vb.net but i donot know the copy code source and copy class and cut code source please guide me.
thanks a lot;)
|
|
|
|
|
Too much broken English. Rather I would say
Too broken English much Can you be more clear?
|
|
|
|
|
Is what you are after a way of setting / getting the clipbard data in your code? If so then
clipboard.SetText("myString")
to add the selected text to the clipboard. Reading is a little more complicated since you might have something which is not text in the clipboard so you can...
Dim clipboardData as iDataObject = Clipboard.GetDataObject
if clipBoardData.GetDataPresent(DataFormats.Text) Then
Return clipBoardData.GetData(DataFormats.Text)
else
'The clipboard contains something other than text
end if
|
|
|
|
|
If you're using a rich text box you might also want to check if the data isn't an image since a rich text box accepts images too (altough at the moment I can't seem to get the images to display but it did it in an other program so it is possible and he'll always paste them (no errors))
however if you allow images formatting your text becomes a lot more difficult (you have to check if the selected text doesn't contain an image otherwise you'll get an error (image can't be bold or something else))
|
|
|
|
|
Hi
If any one know TreeListView plz inform me
i have usrgent requirement.
That control structure is
+ S1
child1 list1 1/12/2007
child2 list2 3/2/2005
I have to implement with listview combine treeview
Thx
|
|
|
|
|
All you have to do is search the articles here on CP for "TreeListView".
|
|
|
|
|
Hi
I have 1000 rows are there in our database,it takes long time for bind data to treelistview using datareader.
can u give me any solution plz
Regrds,
Ravi
|
|
|
|
|
Does the user really need all 1000 of those nodes? The ONLY solution you have to to not populate the tree with something the user isn't going to need.
|
|
|
|
|
hi all
my software product is completed for sell into market and i want to make a trial version for my software how could i do that, plz give any suggustion or idea regarding that.
With regards
Yogesh Agarwal
|
|
|
|
|
|
I am doing a application connecting to a remote SQL server .....
my code is
myConnectionString = "Data Source=***.**.***.***;Initial Catalog=Project;User ID=sa;Password=****;"
Dim myConnection As New SqlConnection(myConnectionString)
when i am using my com to access it .... i can work but if i bring my project to another computer to run it ...
it can't work and the error is this server do not exist...
can any one can help with this....
|
|
|
|
|
I'm going to use my psychic powser and guess your using Sql Server 2005 Express? You might want to be a bit more detailed if you expect decent help :P
If you do have Sql Server 2005 Express then read this:
http://www.datamasker.com/SSE2005_NetworkCfg.htm[^]
If your not then be more detailed. Tell us what version of Sql Server, give us the exact error message and any error codes.
|
|
|
|
|
sorry about that...... i am using MS SQL server .... no 2003 no 2005
plainly ms sql server
and the error is
An unhandled exception of type 'System.Web.Services.Protocols.SoapException' occurred in system.web.services.dll
Additional information: Server was unable to process request. --> SQL Server does not exist or access denied.
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
)