Visual Basic

5-Feb-12 0:17

Not if there's a reaction to it - we wouldn't want orphaned reactions.

Bastard Programmer from Hell Suspicious | :suss:

Create Pdf Viewer

Arul Suman4-Feb-12 23:22

Arul Suman

4-Feb-12 23:22

Dear all,

Please help to create pdf viewer in VB (only viewer - disable Save, SaveAs, Print options)

thanks
Jackson..

Abhinav S4-Feb-12 23:42

Abhinav S

4-Feb-12 23:42

You can start with http://visualbasic.about.com/od/quicktips/qt/disppdf.htm[^].

Arul Suman4-Feb-12 23:52

Arul Suman

4-Feb-12 23:52

thanks. but that codings is allow to SaveAs the file to another location..

actually wat i want na... that pdf viewer is not give access to do saveAs, Print, etc .......only to view the pdf file..

thanks..

Eddy Vluggen5-Feb-12 0:18

5-Feb-12 0:18

..that means that there's a physical file, doesn't it. What's to stop me from opening that file using Acrobat?

Bastard Programmer from Hell Suspicious | :suss:

Arul Suman5-Feb-12 0:51

Arul Suman

5-Feb-12 0:51

Adobe reader is give the permission to SaveAs & print.. but i need to view the pdf file without the option SAVEAS & Print...

Eddy Vluggen5-Feb-12 0:56

Newby to ADO.NET needs help upgrading from VB6 recordset update batch

5-Feb-12 0:56

So? I'll simply download CutePDF to print the file.

If the file is on the computer of the user, then the user becomes the owner of that file. You can't prevent the owner from manipulating his/her files.

Bastard Programmer from Hell Suspicious | :suss:

Member 86051774-Feb-12 5:51

Member 8605177

4-Feb-12 5:51

I'm converting an old VB6 application to VB2010 and I've run across a situation I can't seem to figure out from the books I have and web posts so your help will be appreciated.

The problem is iterating through a recordset assigning values to 20+ fields and then doing an update batch.

So far all I've been able to figure out is to use an OleDBCommand class and ExecuteNonQuery method and create individual UPDATE SQL commands for each of the 20+ fields I'm dealing with. I'm hoping there is a simpler way similar to the old ADO UpdateBatch.

Here's sort of what my old VB6 code looks like:

Set Conn = New ADODB.Connection
Conn.Open strDSNName
Set rs = New ADODB.Recordset
gstrSQL = "SELECT * from Judges;"
Set rs.ActiveConnection = Conn
rs.CursorLocation = adUseClient
rs.CursorType = adOpenStatic
rs.LockType = adLockBatchOptimistic

rs.Open strSQL
Conn.Close
Set Conn = Nothing

rs.MoveFirst
Do Until rs.EOF
    rs.Fields("Response3").Value = rs.Fields("Response2").Value
    rs.Fields("AssignedCat3").Value = rs.Fields("AssignedCat2").Value
    ...
20 more lines setting field3 to field2
...
    rs.MoveNext
Loop
Set Conn = New ADODB.Connection
Conn.Open strDSNName
rs.ActiveConnection = Conn
rs.UpdateBatch
rs.close
set rs = nothing
conn.close
set conn.close

Thanks

Re: Newby to ADO.NET needs help upgrading from VB6 recordset update batch

Eddy Vluggen5-Feb-12 6:05

Re: Newby to ADO.NET needs help upgrading from VB6 recordset update batch

5-Feb-12 6:05

MSDN[^] has a page on the topic.

Bastard Programmer from Hell Suspicious | :suss:

Member 86051775-Feb-12 6:50

Member 8605177

5-Feb-12 6:50

Thank you for taking the time to point me in this direction. I have been looking at the dataadapter. Unfortunately (for me), having never seen a VB snippet that applies to my situation I'm sort of lost, especially since I have never used "Parameters" in an update statement. It is sometimes difficult for me to understand a concept without a real life example.

Thanks (still hoping for a code sample from someone that sort of addesses my VB6 snip)

Re: Newby to ADO.NET needs help upgrading from VB6 recordset update batch

Eddy Vluggen5-Feb-12 7:19

Re: Newby to ADO.NET needs help upgrading from VB6 recordset update batch

5-Feb-12 7:19

Member 8605177 wrote:
still hoping for a code sample

Also on MSDN, using a DataTable[^] Smile | :)

Bastard Programmer from Hell Suspicious | :suss:

Member 86051775-Feb-12 11:03

Member 8605177

5-Feb-12 11:03

since I've never users parameters i have a question - assume my table consists of 20 fields. does that mean I need to define 20 parameters, one for each field?

Re: Newby to ADO.NET needs help upgrading from VB6 recordset update batch

Eddy Vluggen5-Feb-12 19:45

5-Feb-12 19:45

Yup.

Bastard Programmer from Hell Suspicious | :suss:

DataReader with SQL Join

C#Coudou2-Feb-12 19:51

C#Coudou

2-Feb-12 19:51

Is there any workarounds on how to read the data from sql join using sqldatareader.

SQL

query ="SELECT TABLE1.FID FROM TABLE2 WHERE TABLE1.ID = TABLE2.ID" ---StoredProcedure

Dim sqlRead As SqlDataReader

cmd.CommandType = CommandType.StoredProcedure 
sqlRead = cmd.ExecuteReader 

While sqlRead .Read()
  Dim str as String = sqlRead("FID") '-------> error here!
End While

Yes, I know that the good solution is to put "AS" clause on query.
Let say, TABLE1.FID AS FID.

But the problem is I have 100 StoredProcedures and each has no alias.
It's very difficult if I will modify all the SP just to put that clause.

Thanks in advance

C# コードMicrosoft End User
2000-2008

「「「「「「「「「「「「「「「「「「「「「「「「「「「「
The best things in life are free
」」」」」」」」」」」」」」」」」」」」」」」」」」」」

Wayne Gaylard2-Feb-12 20:26

Wayne Gaylard

2-Feb-12 20:26

You can retrieve datareader results by using the index, like this:-

While dr.Read
            'if you just want a string representation
            Dim id As String = dr(0).ToString()
            'if you know the result is stored as string
            id = dr.GetString(0)
            'can also retrieve ints, decimals, dates etc
            id = dr.GetInt32(0)
            id = dr.GetDateTime(0)
            id = dr.GetDecimal(0)
        End While

When I was a coder, we worked on algorithms. Today, we memorize APIs for countless libraries — those libraries have the algorithms - Eric Allman

C#Coudou2-Feb-12 21:13

C#Coudou

2-Feb-12 21:13

thank you for quick reply.

i found out also that if i will not put dr.read in an if statement, it causes an error. weird.
like this...
if dr.read then
while....
endif

Simon_Whale2-Feb-12 21:54

Simon_Whale

2-Feb-12 21:54

I would change your

if dr.read then

if dr.hasrows then

This is a check to see if the datareader has any rows in its collection. further reading Datareader.hasrows[^]

Lobster Thermidor aux crevettes with a Mornay sauce, served in a Provençale manner with shallots and aubergines, garnished with truffle pate, brandy and a fried egg on top and Spam - Monty Python Spam Sketch

C#Coudou2-Feb-12 21:57

C#Coudou

2-Feb-12 21:57

how can i read the datareader backward.
let say i have data
number=1,2,3,4,5,6,7,8,9,10.

dr(number) 'i want result start at 10.

in dataset,

ds.Tables(0).Rows.Count - 1 To 0 Step -1

Wayne Gaylard2-Feb-12 22:13

Wayne Gaylard

2-Feb-12 22:13

You can't read a datareader backward as it is a forward only reader. You will have to do an order by on your sql query to return the rows in the order you wish them. i.e

SQL

SELECT id, name FROM employees ORDER BY id DESC

or something like that.

When I was a coder, we worked on algorithms. Today, we memorize APIs for countless libraries — those libraries have the algorithms - Eric Allman

Johan Hakkesteegt2-Feb-12 23:35

Johan Hakkesteegt

2-Feb-12 23:35

Hi,

Wayne's suggestion is viable, but using index numbers instead of field names is not recommended, because your code will become harder and harder to maintain, when you add more fields to your query.

Generally speaking you may want to adapt your code thus:

If sqlRead.HasRows Then 
   Dim str as String = String.Empty
   Do While sqlRead.Read()
      str = sqlRead.Item("FID").ToString
      ' Do something with str here or outside the Do loop, when you expect only a single result
   End While
End If

If your query has only a single field with the name FID, the DataReader will automatically translate FID to TABLE1.FID.

Just as a matter of interest, are you using MS SQL or some other DB, because I can't get your query to work? In other words, what I am wondering is, the problem may simply be the query, and not so much the code.

Cheers,
Johan

My advice is free, and you may get what you paid for.

Dave Kreskowiak3-Feb-12 2:28

Dave Kreskowiak

3-Feb-12 2:28

Ummm, If query is actual code in your app, it is not a stored procedure. That's straight up CommandType.Text. A stored procedure in your code would be the name of a stored proc in the database itself.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

vb.net

Member 82843502-Feb-12 18:58

Member 8284350

2-Feb-12 18:58

how to get connection string in vb.net.....???

i made database from vb.net itself
n copy connection string but i doesn't work....
can one help me in my problem
i used dis code....

Dim ConnectionString As String = "Data Source=|DataDirectory|\Database1.sdf"
//above codes gives some error

Dim Connection As New SqlConnection(ConnectionString)
Dim command As New SqlCommand("SELECT * FROM student", Connection)

Try
Connection.Open()
command.ExecuteNonQuery()
Catch ex As Exception
MsgBox(ex.ToString)
Finally
Connection.Close()
End Try

Re: vb.net

Simon_Whale2-Feb-12 21:50

Simon_Whale

2-Feb-12 21:50

Have a look at www.connectionstrings.com[^]

Lobster Thermidor aux crevettes with a Mornay sauce, served in a Provençale manner with shallots and aubergines, garnished with truffle pate, brandy and a fried egg on top and Spam - Monty Python Spam Sketch

Re: vb.net

Eddy Vluggen3-Feb-12 0:22