HI all
one sequence has many panels. when i select combo it displays all the fields but panel has more rows. i want to view that also. how to do that?
move next and previous commds are there but not working.
pls help me with coding
here goes my coding - Private Sub sequcombo_Click()
-
-
myconnection
-
-
myquery = sequcombo.Text
-
-
Call rLOAD
-
Do While storyboard!sequence <> myquery
-
storyboard.MoveNext
-
If storyboard!sequence = myquery Then
-
scenecombo.Text = storyboard!scenes 'sceneid depends on the table(sequence)
-
-
Call PanelCOUNT
-
panel_txt.Text = storyboard!Panel
-
action_txt.Text = storyboard!Action
-
dialogue_txt.Text = storyboard!dialogue
-
'Image1.Picture = LoadPicture(App.Path & "\images\" & storyboard("filename"))
-
Image1.Picture = LoadPicture(storyboard!Filename) 'this produce sometimes in frame else error whileloading
-
noofpanel.Text = storyboard.RecordCount 'panelcount not displaying exact count of particular sequence
-
End If
-
Loop
-
-
accdb = "SELECT DISTINCT sequence FROM sequence WHERE seqid = '" & myquery & "' "
-
'Load SQL query into a variable
-
-
Set storyboard = CON.Execute(accdb, adOpenStatic)
-
End Sub
thanks in advance
55  3581 
How many more rows do you want to view?
How many more rows do you want to view?
(panel)row is going to be indefinite in number.
seq
SW001 A
B
C
D these rows i want to display. - Sub rLOAD()
-
Set storyboard = New ADODB.Recordset
-
' Open Recordset
-
If CON.State = 1 Then
-
MsgBox "Connection is opened"
-
Else
-
MsgBox "Connection is not opened"
-
End If
-
storyboard.Open "SELECT scenes, sequence, panel, filename, action, dialogue FROM panel WHERE scenes = '" & scenecombo.Text & "'", CON, adOpenKeyset, adLockReadOnly
-
End Sub
when i click next button it shows 2 recordcount of that scene but not moving.
(panel)row is going to be indefinite in number.
seq
SW001 A
B
C
D these rows i want to display.
- Sub rLOAD()
-
Set storyboard = New ADODB.Recordset
-
' Open Recordset
-
If CON.State = 1 Then
-
MsgBox "Connection is opened"
-
Else
-
MsgBox "Connection is not opened"
-
End If
-
storyboard.Open "SELECT scenes, sequence, panel, filename, action, dialogue FROM panel WHERE scenes = '" & scenecombo.Text & "'", CON, adOpenKeyset, adLockReadOnly
-
End Sub
when i click next button it shows 2 recordcount of that scene but not moving.
whatz up? no one is there to help me.
whatz up? no one is there to help me.
Don't be too impatient. The experts on this site are all volunteers, who have to find the time to help out here - it's not a paid job or anything. We are a little short on VB experts right now, due to illnesses and other commitments.
I'm sure willakawill will get back to you ASAP.
(Also, keep in mind that we live in various timezones).
Don't be too impatient. The experts on this site are all volunteers, who have to find the time to help out here - it's not a paid job or anything. We are a little short on VB experts right now, due to illnesses and other commitments.
I'm sure willakawill will get back to you ASAP.
(Also, keep in mind that we live in various timezones).
Au contraire. I am not too willing to continually work out an entire app for someone who always posts work everyone else has done for him not understanding it himself. Makes for a long drawn out botomless pit of suggestions
Au contraire. I am not too willing to continually work out an entire app for someone who always posts work everyone else has done for him not understanding it himself. Makes for a long drawn out botomless pit of suggestions
sorry for that.
so far i ve posted only 20 post in Vb. Rest of the post to MS access. Am very new to VB. thats y am asking such a question and suggestion form u guys.
thanks for the cooperation frm u guys.
good bye.
HI all
one sequence has many panels. when i select combo it displays all the fields but panel has more rows. i want to view that also. how to do that?
move next and previous commds are there but not working.
pls help me with coding
here goes my coding
- Private Sub sequcombo_Click()
-
-
myconnection
-
-
myquery = sequcombo.Text
-
-
Call rLOAD
-
Do While storyboard!sequence <> myquery
- storyboard.MoveNext
-
If storyboard!sequence = myquery Then
-
scenecombo.Text = storyboard!scenes 'sceneid depends on the table(sequence)
-
-
Call PanelCOUNT
-
panel_txt.Text = storyboard!Panel
-
action_txt.Text = storyboard!Action
-
dialogue_txt.Text = storyboard!dialogue
-
'Image1.Picture = LoadPicture(App.Path & "\images\" & storyboard("filename"))
-
Image1.Picture = LoadPicture(storyboard!Filename) 'this produce sometimes in frame else error whileloading
-
noofpanel.Text = storyboard.RecordCount 'panelcount not displaying exact count of particular sequence
-
End If
-
Loop
-
-
accdb = "SELECT DISTINCT sequence FROM sequence WHERE seqid = '" & myquery & "' "
-
'Load SQL query into a variable
-
-
Set storyboard = CON.Execute(accdb, adOpenStatic)
-
End Sub
thanks in advance
You are coded storyboard.Move Next at the begining of the while loop so it will move to the second record then it will assigen the values
You are coded storyboard.Move Next at the begining of the while loop so it will move to the second record then it will assigen the values
i think this qry will select two record then its showing the second record
whatz up? no one is there to help me.
This is not an answer bank that you can post your question and get answer, this is discussion group that will discus on the questions.
No one is expert to answer; every one is experts to discus
Be Cool Baby to post your QA's
Sign in to post your reply or Sign up for a free account.
Similar topics | |
by: Mohammed Mazid |
last post by:
Can anyone please help me on how to move to the next and previous
question?
Here is a snippet of my code:
Private Sub cmdNext_Click()
End Sub
Private Sub cmdPrevious_Click()
showrecord
|
by: Marco Lazzeri |
last post by:
Hi,
I need some examples of INSERT and UPDATE of DATE columns using
'ALLBALLS' and 'INFINITY' values. I could not find examples on the net.
I need, also, to move columns in tables (just like the MOVE BEFORE/MOVE
AFTER MySQL commands). Can you help me?
Thank you!
Have a nice day,
--
|
by: Alienz |
last post by:
I have a subform where I have a subform with 20 options to select
from. When I set the multiselect property to simple and select
multiple options, nothing is stored. I have another table with
fieldID and fieldtype and I would like for evertime something is
selected in the listbox for a new entry to be created with that
fieldtype for the corresponding fieldID which is linked to the main
form. Basically, how do I get info from the listbox...
|
by: Phil Endecott |
last post by:
Dear Postgresql experts,
According to the documentation for MOVE, it returns the number of rows
that it has moved over. It seems to me that this is true for MOVE
FORWARD n, but not for MOVE RELATIVE n or MOVE ABSOLUTE n when it always
returns 1:
db=> declare c scroll cursor for select * from p;
DECLARE CURSOR
db=> move absolute -1 in c;
|
by: Robert |
last post by:
I have an app that was originally 1.1, now migrated to 2.0 and have run into
some sporadic viewstate errors...usually saying the viewstate is invalid,
eventvalidation failed or mac error.
My web config does specify a machinekey setting:
<machineKey
validationKey="447C05E8B3A71401CC4CAE5513A7F1A3494A3618EE819316AAD1D58433F236A759D66FB4154500E01EB4E1BC1DE42046E2D652D391CB8367A1649438867A02EB"...
| | |
by: TMS |
last post by:
Schools over!!! Now its time to play.
I would like to learn how to make objects move from one location to the next on a canvas widget. For example:
from Tkinter import *
class square:
def __init__(self, canvas, xy, color, change):
self.canvas = canvas
self.id = self.canvas.create_rectangle(-10-abs(change),
|
by: shrik |
last post by:
I have following error :
Total giant files in replay configuration file are :
File name : /new_file/prob1.rec
Given file /new_file/prob1.rec is successfully verified.
Splitting for giant file /new_file/prob1.rec started. Please wait....
In while loop of request searching
*** glibc detected *** ./a.out: free(): invalid next size (normal): 0x099da890 ***
======= Backtrace: =========
/lib/libc.so.6
|
by: ewankosayo |
last post by:
Hi can anyone help me how can i move to the next record?
While Reader.Read
For Each Row As DataRow In Table.Rows
If Reader("UserID") = Row("UserID") Then
' I need to Move to the next Row here..
' How can i Move to the Next Row?
Else
Dim Item As New ListViewItem
Call Item.SubItems.Add(Reader("Name"))
|
by: jaeden99 |
last post by:
I was wandering if nyone has a script to move files older than x days old? i've seen several to delete, but I don't want to delete. I would like to create a backup of the files first verify with users if it's ok to delete.
Thanks in advance. i found one that was really close but it only looks at one folder. I need it to look at files within folders and subfolders too.
Dim oFSO, wshShell, FileCol, oFolder, objTextFile, shareLength,...
|
by: marktang |
last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look !
Part I. Meaning of...
|
by: Hystou |
last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it.
First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
| | |
by: Oralloy |
last post by:
Hello folks,
I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>".
The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed.
This is as boiled down as I can make it.
Here is my compilation command:
g++-12 -std=c++20 -Wnarrowing bit_field.cpp
Here is the code in...
|
by: Hystou |
last post by:
Overview:
Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For most users, this new feature is actually very convenient. If you want to control the update process,...
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules.
He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms.
Adolph will...
|
by: conductexam |
last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one.
At the time of converting from word file to html my equations which are in the word document file was convert into image.
Globals.ThisAddIn.Application.ActiveDocument.Select();...
|
by: TSSRALBI |
last post by:
Hello
I'm a network technician in training and I need your help.
I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs.
The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols.
I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
|
by: adsilva |
last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
| | |
by: bsmnconsultancy |
last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...
| |
